Altering social network position prevents social isolation (using closeness centrality)

Does allocating cooperative individuals to high-degree nodes prevent isolation?

round = NULL
gameID = NULL 
nodes = NULL
meanDegree = NULL
meanDegreeCoop = NULL #mean degree among those who cooperated
meanDegreeDefect = NULL #mean degree among those who defected
meanDist = NULL #mean shortest path length divided by the maximum possible path length (Nvertices - 1)
maxDist = NULL #max shortest path length divided by the maximum possible path length (Nvertices - 1)
coefGlobal = NULL #global clustering coefficient
percentCoop = NULL #proportion of those who cooperated
percentCoopPopular = NULL #proportion of those who cooperated, among those with degree >=10
coopEnv = NULL 
assort = NULL

for(i in 1:length(g.isolation)){
    round[i] =  mean(V(g.isolation[[i]])$round)
    gameID[i] = V(g.isolation[[i]])$gameID[1]
    nodes[i] = vcount(g.isolation[[i]])
    meanDegree[i] = mean(igraph::degree(g.isolation[[i]]),na.rm=TRUE)
    meanDegreeCoop[i] = mean(igraph::degree(g.isolation[[i]])[V(g.isolation[[i]])$behavior=="C"],na.rm=TRUE)
    meanDegreeDefect[i] = mean(igraph::degree(g.isolation[[i]])[V(g.isolation[[i]])$behavior=="D"],na.rm=TRUE)
    meanDist[i] = mean(distances(g.isolation[[i]])[distances(g.isolation[[i]])!=0 & distances(g.isolation[[i]])!=Inf],na.rm=TRUE) / length(V(g.isolation[[i]])-1)
    maxDist[i] = max(distances(g.isolation[[i]])[distances(g.isolation[[i]])!=0 & distances(g.isolation[[i]])!=Inf],na.rm=TRUE) / length(V(g.isolation[[i]])-1)
    coefGlobal[i] = transitivity(g.isolation[[i]], type="global")
    percentCoop[i] = prop.table(table(V(g.isolation[[i]])$behavior))["C"]
    percentCoopPopular[i] = prop.table(table(V(g.isolation[[i]])$behavior[igraph::degree(g.isolation[[i]])>=6]))["C"]
    coopEnv[i] = sum(ifelse(V(g.isolation[[i]])$behavior=="C",1,0)*igraph::degree(g.isolation[[i]])/sum(igraph::degree(g.isolation[[i]])),na.rm=TRUE)
    assort[i] = assortativity(g.isolation[[i]], V(g.isolation[[i]])$behavior == "C")
}

smallWorld = data.frame(
  round = round,
  gameID = gameID,
  nodes = nodes,
  meanDegree = meanDegree,
  meanDegreeCoop = meanDegreeCoop,
  meanDegreeDefect = meanDegreeDefect,
  diffDegreeCD = meanDegreeCoop - meanDegreeDefect,
  meanDist = meanDist,
  maxDist = maxDist,
  coefGlobal = coefGlobal,
  percentCoop = percentCoop,
  percentCoopPopular = percentCoopPopular,
  coopEnv = coopEnv,
  assort = assort
)


round = NULL
gameID = NULL
visibleWealth = NULL
n=1
for(i in unique(cdata$round)){
  for(m in unique(cdata$gameID)){
    round[n] = as.numeric(i)-1
    gameID[n] = m
    visibleWealth[n] = ifelse(cdata[cdata$round==i & cdata$gameID==m,]$showScore[1]=="true",1,0)
    n=n+1
  }
}

smallWorld.2 = data.frame(
  round = round,
  gameID = gameID,
  visibleWealth = visibleWealth
)

smallWorld = merge(smallWorld, smallWorld.2, by=c("gameID","round"), all.x=TRUE)

smallWorld.initial = subset(smallWorld, smallWorld$round==0)

#percent of people that end up being isolated for each gameID
percentIsolated = NULL
percentIsolated = aggregate(isolated ~ gameID, data=sample.wide, FUN=max, na.rm=TRUE)
smallWorld.initial = merge(smallWorld.initial[c("gameID","meanDegree","meanDegreeCoop","meanDegreeDefect","diffDegreeCD","meanDist","coefGlobal","visibleWealth","percentCoop","percentCoopPopular","coopEnv","assort")],percentIsolated, by="gameID", all.x=TRUE)

percentIsolated = NULL
percentIsolated = aggregate(isolated ~ gameID, data=sample.wide, FUN=mean, na.rm=TRUE)
percentIsolated = percentIsolated %>% rename(
  percentIsolated = isolated
)
smallWorld.initial = merge(smallWorld.initial,percentIsolated, by="gameID", all.x=TRUE)




reg = glm(isolated ~ coopEnv, 
      data = smallWorld.initial,
      family = binomial(link = "logit"))
summary(reg)

## 
## Call:
## glm(formula = isolated ~ coopEnv, family = binomial(link = "logit"), 
##     data = smallWorld.initial)
## 
## Deviance Residuals: 
##     Min       1Q   Median       3Q      Max  
## -2.3756   0.2641   0.4839   0.6926   1.3696  
## 
## Coefficients:
##             Estimate Std. Error z value Pr(>|z|)    
## (Intercept)    6.047      1.734   3.487 0.000489 ***
## coopEnv       -6.813      2.351  -2.898 0.003750 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## (Dispersion parameter for binomial family taken to be 1)
## 
##     Null deviance: 82.760  on 79  degrees of freedom
## Residual deviance: 72.371  on 78  degrees of freedom
## AIC: 76.371
## 
## Number of Fisher Scoring iterations: 5

reg = glm(isolated ~ coopEnv*percentCoop, 
      data = smallWorld.initial,
      family = binomial(link = "logit"))
summary(reg)

## 
## Call:
## glm(formula = isolated ~ coopEnv * percentCoop, family = binomial(link = "logit"), 
##     data = smallWorld.initial)
## 
## Deviance Residuals: 
##     Min       1Q   Median       3Q      Max  
## -2.2132   0.4220   0.4658   0.5862   1.7551  
## 
## Coefficients:
##                     Estimate Std. Error z value Pr(>|z|)
## (Intercept)           -3.096      6.866  -0.451    0.652
## coopEnv               10.481     12.639   0.829    0.407
## percentCoop           10.681     12.929   0.826    0.409
## coopEnv:percentCoop  -20.525     14.822  -1.385    0.166
## 
## (Dispersion parameter for binomial family taken to be 1)
## 
##     Null deviance: 82.760  on 79  degrees of freedom
## Residual deviance: 70.472  on 76  degrees of freedom
## AIC: 78.472
## 
## Number of Fisher Scoring iterations: 4

reg = glm(isolated ~ assort, 
      data = smallWorld.initial,
      family = binomial(link = "logit"))
summary(reg)

## 
## Call:
## glm(formula = isolated ~ assort, family = binomial(link = "logit"), 
##     data = smallWorld.initial)
## 
## Deviance Residuals: 
##     Min       1Q   Median       3Q      Max  
## -1.9579   0.5132   0.6439   0.7269   1.0178  
## 
## Coefficients:
##             Estimate Std. Error z value Pr(>|z|)    
## (Intercept)   1.1349     0.3207   3.539 0.000402 ***
## assort       -3.7358     3.0781  -1.214 0.224862    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## (Dispersion parameter for binomial family taken to be 1)
## 
##     Null deviance: 67.731  on 64  degrees of freedom
## Residual deviance: 66.177  on 63  degrees of freedom
##   (15 observations deleted due to missingness)
## AIC: 70.177
## 
## Number of Fisher Scoring iterations: 4

reg = glm(isolated ~ assort*percentCoop, 
      data = smallWorld.initial,
      family = binomial(link = "logit"))
summary(reg)

## 
## Call:
## glm(formula = isolated ~ assort * percentCoop, family = binomial(link = "logit"), 
##     data = smallWorld.initial)
## 
## Deviance Residuals: 
##     Min       1Q   Median       3Q      Max  
## -2.5706   0.1873   0.4272   0.6978   1.3591  
## 
## Coefficients:
##                    Estimate Std. Error z value Pr(>|z|)   
## (Intercept)           6.695      2.392   2.799  0.00512 **
## assort              -23.388     22.419  -1.043  0.29684   
## percentCoop          -7.680      3.186  -2.411  0.01593 * 
## assort:percentCoop   25.842     29.451   0.877  0.38024   
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## (Dispersion parameter for binomial family taken to be 1)
## 
##     Null deviance: 67.731  on 64  degrees of freedom
## Residual deviance: 56.386  on 61  degrees of freedom
##   (15 observations deleted due to missingness)
## AIC: 64.386
## 
## Number of Fisher Scoring iterations: 5

reg = glm(percentIsolated ~ coopEnv, 
      data = smallWorld.initial, 
      family = gaussian(link = "identity"))
summary(reg)

## 
## Call:
## glm(formula = percentIsolated ~ coopEnv, family = gaussian(link = "identity"), 
##     data = smallWorld.initial)
## 
## Deviance Residuals: 
##      Min        1Q    Median        3Q       Max  
## -0.12622  -0.05564  -0.02541   0.03834   0.25903  
## 
## Coefficients:
##             Estimate Std. Error t value Pr(>|t|)    
## (Intercept)  0.20852    0.04303   4.846 6.29e-06 ***
## coopEnv     -0.17058    0.06391  -2.669  0.00925 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## (Dispersion parameter for gaussian family taken to be 0.006957149)
## 
##     Null deviance: 0.59222  on 79  degrees of freedom
## Residual deviance: 0.54266  on 78  degrees of freedom
## AIC: -166.43
## 
## Number of Fisher Scoring iterations: 2

reg = glm(percentIsolated ~ coopEnv*percentCoop, 
      data = smallWorld.initial, 
      family = gaussian(link = "identity"))
summary(reg)

## 
## Call:
## glm(formula = percentIsolated ~ coopEnv * percentCoop, family = gaussian(link = "identity"), 
##     data = smallWorld.initial)
## 
## Deviance Residuals: 
##      Min        1Q    Median        3Q       Max  
## -0.15277  -0.04970  -0.01807   0.03678   0.25172  
## 
## Coefficients:
##                     Estimate Std. Error t value Pr(>|t|)
## (Intercept)           0.1084     0.1925   0.563    0.575
## coopEnv               0.4950     0.3742   1.323    0.190
## percentCoop          -0.2223     0.3692  -0.602    0.549
## coopEnv:percentCoop  -0.3977     0.4417  -0.900    0.371
## 
## (Dispersion parameter for gaussian family taken to be 0.006743275)
## 
##     Null deviance: 0.59222  on 79  degrees of freedom
## Residual deviance: 0.51249  on 76  degrees of freedom
## AIC: -167.01
## 
## Number of Fisher Scoring iterations: 2

reg = glm(percentIsolated ~ assort, 
      data = smallWorld.initial, 
      family = gaussian(link = "identity"))
summary(reg)

## 
## Call:
## glm(formula = percentIsolated ~ assort, family = gaussian(link = "identity"), 
##     data = smallWorld.initial)
## 
## Deviance Residuals: 
##      Min        1Q    Median        3Q       Max  
## -0.13800  -0.04889  -0.01599   0.03676   0.29844  
## 
## Coefficients:
##             Estimate Std. Error t value Pr(>|t|)    
## (Intercept)  0.08136    0.01164   6.988  2.1e-09 ***
## assort      -0.33980    0.09891  -3.435  0.00105 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## (Dispersion parameter for gaussian family taken to be 0.006992089)
## 
##     Null deviance: 0.52302  on 64  degrees of freedom
## Residual deviance: 0.44050  on 63  degrees of freedom
##   (15 observations deleted due to missingness)
## AIC: -134.16
## 
## Number of Fisher Scoring iterations: 2

reg = glm(percentIsolated ~ assort*percentCoop, 
      data = smallWorld.initial, 
      family = gaussian(link = "identity"))
summary(reg)

## 
## Call:
## glm(formula = percentIsolated ~ assort * percentCoop, family = gaussian(link = "identity"), 
##     data = smallWorld.initial)
## 
## Deviance Residuals: 
##      Min        1Q    Median        3Q       Max  
## -0.13441  -0.04183  -0.01733   0.02556   0.27510  
## 
## Coefficients:
##                    Estimate Std. Error t value Pr(>|t|)    
## (Intercept)         0.22289    0.05970   3.733 0.000418 ***
## assort             -0.70774    0.42639  -1.660 0.102080    
## percentCoop        -0.20362    0.08504  -2.394 0.019731 *  
## assort:percentCoop  0.59881    0.63264   0.947 0.347615    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## (Dispersion parameter for gaussian family taken to be 0.006108948)
## 
##     Null deviance: 0.52302  on 64  degrees of freedom
## Residual deviance: 0.37265  on 61  degrees of freedom
##   (15 observations deleted due to missingness)
## AIC: -141.04
## 
## Number of Fisher Scoring iterations: 2

# #MSM
# # estimation of denominator of ip weights
# #cooperatorの数以外は全てRandom（Erdos-Renyi random graphにより決まるため）なので、coopEnvはpercentCoopで調整すれば十分か
# den.fit.obj <- lm(coopEnv ~ percentCoop + I(percentCoop^2), data = smallWorld.initial)
# p.den <- predict(den.fit.obj, type = "response")
# dens.den <- dnorm(smallWorld.initial$coopEnv, p.den, summary(den.fit.obj)$sigma)
# 
# # estimation of numerator of ip weights
# num.fit.obj <- lm(coopEnv ~ 1, data = smallWorld.initial)
# p.num <- predict(num.fit.obj, type = "response")
# dens.num <- dnorm(smallWorld.initial$coopEnv, p.num, summary(num.fit.obj)$sigma)
# 
# smallWorld.initial$sw.a = dens.num/dens.den
# summary(smallWorld.initial$sw.a)
# 
# msm.sw.cont <-geepack::geeglm(isolated ~ coopEnv, 
#                  data=smallWorld.initial, weights=sw.a, family = binomial(link="logit"), id=gameID, corstr="independence")
# summary(msm.sw.cont)
# 
# msm.sw.cont <-geepack::geeglm(percentIsolated ~ coopEnv, 
#                  data=smallWorld.initial, weights=sw.a, family = gaussian(link="identity"), id=gameID, corstr="independence")
# summary(msm.sw.cont)


ggplot(data = smallWorld.initial, aes(x = coopEnv, y = percentIsolated)) + 
  geom_point() +
  ggtitle("Percent isolated") +
  scale_x_continuous("Cooporative environment") +  
  scale_y_continuous("Percent of individuals isolated") + 
  scale_fill_continuous(type = "viridis")

ggplot(data = smallWorld.initial, aes(x = assort, y = percentIsolated)) + 
  geom_point() +
  ggtitle("Percent isolated") +
  scale_x_continuous("Assortativity coefficient of initial C/D") +  
  scale_y_continuous("Percent of individuals isolated") + 
  scale_fill_continuous(type = "viridis")

## Warning: Removed 15 rows containing missing values (`geom_point()`).

Simulation 1

All graphs start as Erdos-Renyi random newtorks

Cooperators have low degrees

#Define degrees of isolation
isolationDegree = 2

#number of iterations per arm
iterations = 500

modelForPrediction = "random forest" #"linear" or "random forest"

# List of manipulating parameters of experiments
#L : number of rounds
#V : Visible or not
#A : Income of a rich-group subject
#B : Income of a poor-group subject
#R : Probability to be assigned to a rich group
#I : Number of the same-parameter trial

R = 0.5
I = 0
L = 10


trends.df = data.frame()
  

  
  
for(A in c(1150,700,500)){
  for(V in c(0,1)){
      
      V = V
      A = A
      if(A==1150){B = 200} #high inequality
      if(A==700){B = 300} #low inequality
      if(A==500){B = 500} #no inequality
  
      if(modelForPrediction=="random forest"){
        source(paste(rootdir,"R/models.R",sep="/"))
        if(V==0){
          model1<-model1.invisible(redo=FALSE)
          model2<-model2.invisible(redo=FALSE)
          model3<-model3(redo=FALSE)
          }
        if(V==1){
          model1<-model1.visible(redo=FALSE)
          model2<-model2.visible(redo=FALSE)
          model3<-model3(redo=FALSE)
          }
      }
      
      df.netIntLowDegree = data.frame(
        coopFrac = NULL,
        avgCoop = NULL, 
        avgCoopFinal = NULL, 
        percentIsolation = NULL,
        isolation = NULL,
        percentIsolationC = NULL,
        percentIsolationD = NULL,
        nCommunities = NULL,
        communitySize = NULL,
        assortativityInitial = NULL,
        assortativityFinal = NULL,
        conversionRate = NULL,
        conversionToD = NULL, 
        conversionToC = NULL, 
        transitivity = NULL, 
        degree = NULL, 
        degreeC = NULL, 
        degreeD = NULL,
        meanConversionToD = NULL, 
        meanConversionToC = NULL, 
        degreeLost = NULL,
        degreeLostC = NULL,
        degreeLostD = NULL
      )
  
      #Here, factionCoop=0 will be the control: no rearranging of nodes will take place
      for(frac in c(0,0.25,0.5,0.75,1)){
        #nodes in the top fractionCoop degrees will automatically be a cooperator
        fractionCoop = frac
        
          coopFrac = NULL
          avgCoop = NULL
          homophilyC = NULL
          homophilyD = NULL
          heterophily = NULL
          avgCoopFinal = NULL
          percentIsolation = NULL
          isolation = NULL
          percentIsolationC = NULL
          percentIsolationD = NULL
          nCommunities = NULL
          communitySize = NULL
          assortativityInitial = NULL
          assortativityFinal = NULL
          conversionRate = NULL
          conversionToD = NULL 
          conversionToC = NULL
          transitivity = NULL
          degree = NULL
          degreeC = NULL
          degreeD = NULL
          meanConversionToD = NULL 
          meanConversionToC = NULL
          degreeLost = NULL
          degreeLostC = NULL
          degreeLostD = NULL
          avg_wealth = NULL
          gini = NULL
          for(m in c(1:iterations)){
            # Section 1. NOTES, packages, and Parameters
            #Importing library
            library(igraph) # for network graphing
            library(reldist) # for gini calculatio
            library(boot) # for inv.logit calculation
            #Two prefixed functions
            #rank
            rank1 = function(x) {rank(x,na.last=NA,ties.method="average")[1]} #a smaller value has a smaller rank.
            #gini mean difference (a.k.a. mean difference: please refer to https://stat.ethz.ch/pipermail/r-help/2003-April/032782.html)
            gmd = function(x) {
             x1 = na.omit(x)
             n = length(x1)
            tmp = 0
             for (i in 1:n) {
             for (j in 1:n) {
             tmp <- tmp + abs(x1[i]-x1[j])
             }
             }
            answer = tmp/(n*n)
             return(answer)
            }
        
            
            
            
            # List of fixed parameters of experiments (assumptions)
            #Rewiring rate = 0.3
            #GINI coefficient (can be known by A or B)
            GINI = 0*as.numeric(A==500) + 0.2*as.numeric(A %in% c(700,850)) + 0.4*as.numeric(A ==1150)
            #Collecting data frame (final output data frame)
            result = data.frame(round=0:L,n_par=NA,n_A=NA,avg_coop=NA,avg_degree=NA,avg_wealth=NA,gini=NA,gmd=NA,avg_coop_A=NA,avg_degree_A=NA,avg_wealth_A=NA,gini_A=NA,gmd_A=NA,avg_coop_B=NA,avg_degree_B=NA,avg_wealth_B=NA,gini_B=NA,gmd_B=NA,isolation=NA,percentIsolation=NA,meanConversionToD=NA,meanConversionToC=NA,degreeLost=NA,degreeLostC=NA,degreeLostD=NA)
            #_A is for a richer group and _B is for a poorer group
            
            
            #####################################################
            # Section 1.5: Practice rounds 1 to 2, to determine C/D in round 1
            
            N = 17 # median of the number of participants over rounds.
            node_rp0 = data.frame(ego_id=1:N, round=0)
            node_import = node_rp0
            
            for (k in 1:2){
              node_rX = node_import #Importing data
              node_rX$round = node_rX$round + 1
              node_rX[is.na(node_rX$prev_degree)==1,"prev_degree"] = 0
              node_rX[is.na(node_rX$prev_local_rate_coop)==1,"prev_local_rate_coop"] = 0
              #Only this calculation needs to change from Round 1
              if (k==1) {
                node_rX$prob_coop = inv.logit(1.099471) 
              } else {
                node_rX$prob_coop = inv.logit((-0.02339288) + (1.46068980)*as.numeric(node_rX$prev_coop==1))
              } 
              
              node_rX$coop = apply(data.frame(node_rX$prob_coop),1,function(x) {sample(1:0,1,prob=c(x,(1-x)))})
              
              node_rX$prev_coop = node_rX$coop
                
              assign(paste("coop_rp",k, sep=""),node_rX$coop)
              
              #For the loop
              node_import = node_rX
            }
            
            #cooperation rate in the practice rounds
            coop_rp = apply(cbind(coop_rp1,coop_rp2),1,mean)
      
            #####################################################
            # Section 2: Round 0 (Agents and environments)
            #Node data generation
            N = 17 # median of the number of participants over rounds.
            node_r0 = data.frame(ego_id=1:N, round=0)
            node_r0$coop_rp = ifelse(coop_rp==1,"C","D")
            node_r0$group = sample(c("rich","poor"),N,replace=TRUE,prob=c(R,1-R)) #R is defined as the probability to be assigned to the rich group
            node_r0$initial_wealth = ifelse(node_r0$group=="rich",A,B)
            #Link data generation
            ego_list = NULL
            for (i in 1:N) { ego_list = c(ego_list,rep(i,N)) }
            link_r0 = data.frame(ego_id=ego_list,alt_id=rep(1:N,N))
            link_r0 = link_r0[(link_r0$ego_id < link_r0$alt_id),] #The link was bidirectional, and thus the half and self are omitted.
            link_r0$connected = sample(0:1,dim(link_r0)[1],replace=TRUE,prob=c(0.7,0.3)) #Initial rewiring rate is fixed, 0.3
            link_r0c_ego = link_r0[link_r0$connected==1,]
            link_r0c_alt = link_r0[link_r0$connected==1,]
            colnames(link_r0c_alt) = c("alt_id","ego_id","connected")
            link_r0c = rbind(link_r0c_ego,link_r0c_alt) #this is bidirectional (double counted) for connected ties.
            link_r0c = link_r0c[order(link_r0c$ego_id),]
            link_r0c$alternumber = NA #putting the number for each alter in the same ego
            link_r0c[1,]$alternumber = 1
            for (i in 1:(dim(link_r0c)[1]-1))
              {if (link_r0c[i,]$ego_id == link_r0c[i+1,]$ego_id)
                {link_r0c[i+1,]$alternumber = link_r0c[i,]$alternumber + 1}
              else
                {link_r0c[i+1,]$alternumber = 1}
              #print(i)
              }
            link_r0c2 = reshape(link_r0c, direction = "wide", idvar=c("ego_id","connected"), timevar="alternumber")
            link_r0c2$initial_degree = apply(link_r0c2[,colnames(link_r0c2)[substr(colnames(link_r0c2),1,6) == "alt_id"]],1,function(x){length(na.omit(x))}) #Degree of each ego
            link_r0c2[is.na(link_r0c2$initial_degree)==1,"initial_degree"] = 0
            #Reflect the degree and initial local gini coefficient into the node data
            node_r0 = merge(x=node_r0,y=link_r0c2,all.x=TRUE,all.y=FALSE,by="ego_id")
            node_r0$initial_avg_env_wealth = NA
            node_r0$initial_local_gini = NA #local gini coefficient of the ego and connecting alters
            node_r0$initial_rel_rank = NA #local rank of ego among the ego and connecting alters (divided by the number of the go and connecting alters)
            for (i in 1:(dim(node_r0)[1])){
              node_r0[i,]$initial_avg_env_wealth = mean(na.omit(node_r0[node_r0$ego_id %in%
              node_r0[i,colnames(node_r0)[substr(colnames(node_r0),1,6) %in% c("ego_id","alt_id")]],"initial_wealth"]))
              node_r0[i,]$initial_local_gini = gini(na.omit(node_r0[node_r0$ego_id %in% node_r0[i,colnames(node_r0)[substr(colnames(node_r0),1,6)
              %in% c("ego_id","alt_id")]],"initial_wealth"]))
              node_r0[i,]$initial_rel_rank = rank1(na.omit(node_r0[node_r0$ego_id %in% node_r0[i,colnames(node_r0)[substr(colnames(node_r0),1,6)
              %in% c("ego_id","alt_id")]],"initial_wealth"]))/length(na.omit(node_r0[node_r0$ego_id %in%
              node_r0[i,colnames(node_r0)[substr(colnames(node_r0),1,6) %in% c("ego_id","alt_id")]],"initial_wealth"]))
              }
            #Finalization of round 0 and Visualization
            #plot(graph.data.frame(link_r0[link_r0$connected==1,],directed=F)) #plot.igraph
            node_r0$everIsolated = 0
            node_r0$maxDegreeLost = NA
            result[result$round==0,2:25] = c(length(node_r0$ego_id),length(node_r0[node_r0$group=="rich",]$ego_id),NA,mean(node_r0$initial_degree),mean(node_r0$initial_wealth),gini(node_r0$initial_wealth),gmd(node_r0$initial_wealth),NA,mean(node_r0[node_r0$group=="rich",]$initial_degree),mean(node_r0[node_r0$group=="rich",]$initial_wealth),gini(node_r0[node_r0$group=="rich",]$initial_wealth),gmd(node_r0[node_r0$group=="rich",]$initial_wealth),NA,mean(node_r0[node_r0$group=="poor",]$initial_degree),mean(node_r0[node_r0$group=="poor",]$initial_wealth),gini(node_r0[node_r0$group=="poor",]$initial_wealth),gmd(node_r0[node_r0$group=="poor",]$initial_wealth),
                                             as.numeric(ifelse(is.na(table(node_r0$initial_degree<=isolationDegree)["TRUE"]),0,1)),
                                             as.numeric(sum(node_r0$everIsolated)/length(node_r0$ego_id)),
                                             NA,
                                             NA,
                                             NA,NA,NA
                                             )
            
            g_r0 = graph_from_data_frame(link_r0[link_r0$connected==1,][1:2], directed = FALSE, vertices=node_r0)
            node_r0$prev_closeness = closeness(g_r0)
            
            #For the loop at the next round (for round 1, the initial one is the same as the previous [1 prior] one)
            node_import = node_r0
            node_import$initial_coop = NA
            node_import$prev_coop = NA
            node_import$prev_wealth = node_import$initial_wealth
            node_import$prev_degree = node_import$initial_degree
            node_import$prev_avg_env_wealth = node_import$initial_avg_env_wealth
            node_import$prev_local_gini = node_import$initial_local_gini
            node_import$prev_rel_rank = node_import$initial_rel_rank
            node_import$prev_local_rate_coop = NA
            link_import = link_r0
            
            
            
            #####################################################
            # Section 3: Rounds 1 to 10 or more (behaviors in simulation: the equation of cooperation is different at round 1 because of no history)
            #3-1: Cooperation phase
            for (k in 1:L)
            {
              node_rX = node_import #Importing data
              node_rX$round = node_rX$round + 1
              node_rX[is.na(node_rX$prev_degree)==1,"prev_degree"] = 0
              node_rX[is.na(node_rX$prev_closeness)==1,"prev_closeness"] = 0
              node_rX[is.na(node_rX$prev_local_rate_coop)==1,"prev_local_rate_coop"] = 0
              #Only this calculation needs to change from Round 1
              if(modelForPrediction=="linear"){
                if (k==1) {
                  node_rX$prob_coop = as.numeric(V==0)*inv.logit((-1.816665) + (2.086067)*coop_rp1 + (1.800153)*coop_rp2) + as.numeric(V==1)*inv.logit((-2.031577) + (2.427157)*coop_rp1 + (1.684193)*coop_rp2 + (-1.528851)*GINI)
                  } else {
                  node_rX$prob_coop = as.numeric(V==0 & node_rX$prev_coop==0)*inv.logit(-1.039916) + as.numeric(V==0 & node_rX$prev_coop==1)*inv.logit(2.062023) + as.numeric(V==1 & node_rX$prev_coop==0)*inv.logit((-0.2574838)*as.numeric(node_rX$prev_avg_env_wealth - node_rX$prev_wealth > 0) + (-1.214198)*GINI + (2.508148)*GINI*as.numeric(node_rX$prev_avg_env_wealth - node_rX$prev_wealth > 0) + (-0.9749075)) + as.numeric(V==1 & node_rX$prev_coop==1)*inv.logit((- 0.6197254)*as.numeric(node_rX$prev_avg_env_wealth - node_rX$prev_wealth > 0) + (-0.7480261)*GINI + (1.169674)*GINI*as.numeric(node_rX$prev_avg_env_wealth - node_rX$prev_wealth > 0) + (1.356784))
                  } 
              }
              if(modelForPrediction=="random forest"){
                if (k==1) {
                    if(V==1){node_rX$prob_coop = predict(model1,
                                                         newdata=
                                                           data.frame(
                                                             behavior.p1 = coop_rp1,
                                                             behavior.p2 = coop_rp2,
                                                             gini = GINI
                                                           ),
                                                         type = "prob"
                                                         )[[1]]$C}
                    else if(V==0){node_rX$prob_coop = predict(model1,
                                                         newdata=
                                                           data.frame(
                                                             behavior.p1 = coop_rp1,
                                                             behavior.p2 = coop_rp2
                                                           ),
                                                         type = "prob"
                                                         )[[1]]$C}
                  } else {
                    if(V==1){node_rX$prob_coop = predict(model2,
                                                         newdata=
                                                           data.frame(
                                                             prevCoop = node_rX$prev_coop,
                                                             gini = GINI,
                                                             alterPrevWealth = node_rX$prev_avg_env_wealth,
                                                             egoPrevWealth = node_rX$prev_wealth
                                                           ),
                                                         type = "prob"
                                                         )[[1]]$C}
                    else if(V==0){node_rX$prob_coop = predict(model2,
                                                         newdata=
                                                           data.frame(
                                                             prevCoop = node_rX$prev_coop,
                                                             alterPrevWealth = node_rX$prev_avg_env_wealth,
                                                             egoPrevWealth = node_rX$prev_wealth
                                                           ),
                                                         type = "prob"
                                                         )[[1]]$C}
                  }
              }
              #####rearrange node degrees before round 1 depending on cooperation in practice rounds!
              if(k==1){
                if(fractionCoop==0){
                  node_rX$prob_coop
                  node_rX$coop = apply(data.frame(node_rX$prob_coop),1,function(x) {sample(1:0,1,prob=c(x,(1-x)))})
                  coop_rp_init = coop_rp
                  }
                if(fractionCoop>0){
                  prob_coop_df = NULL
                  nodesCoop = NULL
                  #nodesCoop = node_rX$prev_degree<=quantile(node_rX$prev_degree,fractionCoop) #assign low-closeness centrality nodes to cooperators
                  #assign defectors to designated nodes
                  
                  if(fractionCoop<1){nodesCoop = node_rX$prev_closeness<quantile(node_rX$prev_closeness,fractionCoop) & node_rX$prev_closeness>=quantile(node_rX$prev_closeness,fractionCoop-0.25)}
                  else if(fractionCoop==1){nodesCoop = node_rX$prev_closeness<=quantile(node_rX$prev_closeness,fractionCoop) & node_rX$prev_closeness>=quantile(node_rX$prev_closeness,fractionCoop-0.25)}
                  prob_coop_df = 
                    data.frame(
                      prob_coop = rev(node_rX$prob_coop[order(coop_rp)]),
                      node_number = c(which(!nodesCoop),which(nodesCoop))
                    )
                  node_rX$prob_coop = prob_coop_df[order(prob_coop_df$node_number),]$prob_coop
                  #coop_rp of the rearranged nodes
                  coop_rp_init = rev(coop_rp[order(coop_rp)])[order(prob_coop_df$node_number)]
                  node_rX$coop = apply(data.frame(node_rX$prob_coop),1,function(x) {sample(1:0,1,prob=c(x,(1-x)))})
                }
              } else {
                node_rX$coop = apply(data.frame(node_rX$prob_coop),1,function(x) {sample(1:0,1,prob=c(x,(1-x)))})
              }
              if (k==1) {
                node_rX$initial_coop = node_rX$coop
                } else {
                node_rX$initial_coop = node_rX$initial_coop
                }
              node_rX$cost = (-50)*node_rX$coop*node_rX$prev_degree
              node_rX$n_coop_received = NA
              for (i in 1:(dim(node_rX)[1]))
                {
                node_rX[i,]$n_coop_received = sum(node_rX[node_rX$ego_id %in% node_rX[i,colnames(node_rX)[substr(colnames(node_rX),1,6) ==
                "alt_id"]],"coop"])
                }
              node_rX$benefit = 100*node_rX$n_coop_received
              node_rX$payoff = node_rX$cost + node_rX$benefit
              node_rX$wealth = node_rX$prev_wealth + node_rX$payoff
              node_rX$rel_rank = NA
              node_rX$local_rate_coop = NA
              for (i in 1:dim(node_rX)[1])
                {
                node_rX[i,]$rel_rank = rank1(na.omit(node_rX[node_rX$ego_id %in% node_rX[i,colnames(node_rX)[substr(colnames(node_rX),1,6) %in%
                c("ego_id","alt_id")]],"wealth"]))/length(na.omit(node_rX[node_rX$ego_id %in%
                node_rX[i,colnames(node_rX)[substr(colnames(node_rX),1,6) %in% c("ego_id","alt_id")]],"wealth"]))
                node_rX[i,]$local_rate_coop = mean(na.omit(node_rX[node_rX$ego_id %in% node_rX[i,colnames(node_rX)[substr(colnames(node_rX),1,6) %in%
                c("ego_id","alt_id")]],"coop"]))
                }
              node_rX$growth = as.numeric((node_rX$wealth/node_rX$prev_wealth) > 1)
              node_rX = node_rX[,c("ego_id","round","group","prev_degree","initial_wealth","initial_local_gini","initial_coop","coop","wealth","rel_rank","local_rate_coop","growth","everIsolated","maxDegreeLost")] #Pruning the previous-round data (degree is not updating yet)
              
              #3-2: Rewiring phase
              # 30% of ties (unidirectional) are being rewired
              link_rX_1 = link_import #Importing data (bidirectioanl ego-alter [ego_id < alter_id])
              colnames(link_rX_1) = c("ego_id","alt_id","prev_connected")
              link_rX_1$challenge = sample(0:1,dim(link_rX_1)[1],replace=TRUE,prob=c(0.7,0.3)) # The bidirectional ties being rewired are selected (rewiring rate = 0.3).
              ego_node_data =
              node_rX[,c("ego_id","wealth","coop","prev_degree","initial_wealth","initial_local_gini","initial_coop","rel_rank","local_rate_coop","growth")]
              colnames(ego_node_data) =
              c("ego_id","ego_wealth","ego_coop","ego_prev_degree","ego_initial_wealth","ego_initial_local_gini","ego_initial_coop","ego_rel_rank","ego_local_rate_coop","ego_growth")
              alt_node_data =
              node_rX[,c("ego_id","wealth","coop","prev_degree","initial_wealth","initial_local_gini","initial_coop","rel_rank","local_rate_coop","growth")]
              colnames(alt_node_data) =
              c("alt_id","alt_wealth","alt_coop","alt_prev_degree","alt_initial_wealth","alt_initial_local_gini","alt_initial_coop","alt_rel_rank","alt_local_rate_coop","alt_growth")
              link_rX_2 = merge(x=link_rX_1,y=ego_node_data,all.x=TRUE,all.y=FALSE,by="ego_id")
              link_rX_3 = merge(x=link_rX_2,y=alt_node_data,all.x=TRUE,all.y=FALSE,by="alt_id")
              link_rX_3$choice = sample(c("ego","alt"),dim(link_rX_3)[1],replace=TRUE,prob=c(0.5,0.5)) #decision maker for breaking a link, which is a unilateral decision
              #ego_prob: probability of choosing to connect when challenged (asked)
              
              if(modelForPrediction=="linear"){
                link_rX_3$ego_prob = inv.logit((0.5134401)*link_rX_3$prev_connected + (-0.852406)*link_rX_3$ego_coop + (2.96549)*link_rX_3$alt_coop + (-0.1808545))
                link_rX_3$alt_prob = inv.logit((0.5134401)*link_rX_3$prev_connected + (-0.852406)*link_rX_3$alt_coop + (2.96549)*link_rX_3$ego_coop + (-0.1808545))}
              if(modelForPrediction=="random forest"){
                link_rX_3$ego_prob = predict(model3,
                                             newdata=
                                               data.frame(
                                                 previouslyconnected = link_rX_3$prev_connected,
                                                 ego_behavior = link_rX_3$ego_coop,
                                                 alter_behavior = link_rX_3$alt_coop
                                                 ),
                                            type = "prob"
                                             )[[1]]$C
                link_rX_3$alt_prob = predict(model3,
                                             newdata=
                                               data.frame(
                                                 previouslyconnected = link_rX_3$prev_connected,
                                                 ego_behavior = link_rX_3$alt_coop,
                                                 alter_behavior = link_rX_3$ego_coop
                                                 ),
                                            type = "prob"
                                             )[[1]]$C
              }
              link_rX_3$prob_connect = ifelse(link_rX_3$prev_connected == 1, ifelse(link_rX_3$choice == "ego", link_rX_3$ego_prob,
              link_rX_3$alt_prob), link_rX_3$ego_prob*link_rX_3$alt_prob)
              link_rX_3$connect_update = apply(data.frame(link_rX_3$prob_connect),1, function(x) {sample(1:0,1,prob=c(x,(1-x)))})
              link_rX_3$connected = ifelse(link_rX_3$challenge==0,link_rX_3$prev_connected,link_rX_3$connect_update)
              link_rX = link_rX_3[,c("ego_id","alt_id","connected")] #pruning and data is updated
              #Reflect the degree and local gini coefficient into the node data
              link_rXc_ego = link_rX[link_rX$connected==1,]
              link_rXc_alt = link_rX[link_rX$connected==1,]
              colnames(link_rXc_alt) = c("alt_id","ego_id","connected")
              link_rXc = rbind(link_rXc_ego,link_rXc_alt)
              link_rXc = link_rXc[order(link_rXc$ego_id),]
              link_rXc$alternumber = NA
              link_rXc[1,]$alternumber = 1
              for (i in 1:(dim(link_rXc)[1]-1))
                {
                  if (link_rXc[i,]$ego_id == link_rXc[i+1,]$ego_id)
                  {
                  link_rXc[i+1,]$alternumber = link_rXc[i,]$alternumber + 1
                  }
                  else
                  {
                  link_rXc[i+1,]$alternumber = 1
                  }
                  #print(i)
                }
              link_rXc2 = reshape(link_rXc, direction = "wide", idvar=c("ego_id","connected"), timevar="alternumber")
              link_rXc2$degree = apply(link_rXc2[,colnames(link_rXc2)[substr(colnames(link_rXc2),1,3) == "alt"]],1,function(x) {length(na.omit(x))})
              node_rX_final = merge(x=node_rX[,c("ego_id","round","group","initial_wealth","initial_local_gini","initial_coop","coop","wealth","growth","everIsolated","maxDegreeLost")],y=link_rXc2,all.x=TRUE,all.y=FALSE,by="ego_id")
              node_rX_final[is.na(node_rX_final$degree)==1,"degree"] = 0
              node_rX_final$avg_env_wealth = NA
              node_rX_final$local_gini = NA #needs to be updated because the social network changes at the rewiring phase
              node_rX_final$local_rate_coop = NA
              node_rX_final$rel_rank = NA
              for (i in 1:dim(node_rX_final)[1])
                {
                node_rX_final[i,]$avg_env_wealth = mean(na.omit(node_rX_final[node_rX_final$ego_id %in%
                node_rX_final[i,colnames(node_rX_final)[substr(colnames(node_rX_final),1,6) %in% c("ego_id","alt_id")]],"wealth"]))
                node_rX_final[i,]$local_gini = gini(na.omit(node_rX_final[node_rX_final$ego_id %in%
                node_rX_final[i,colnames(node_rX_final)[substr(colnames(node_rX_final),1,6) %in% c("ego_id","alt_id")]],"wealth"]))
                node_rX_final[i,]$local_rate_coop = mean(na.omit(node_rX_final[node_rX_final$ego_id %in%
                node_rX_final[i,colnames(node_rX_final)[substr(colnames(node_rX_final),1,6) %in% c("ego_id","alt_id")]],"coop"]))
                node_rX_final[i,]$rel_rank = rank1(na.omit(node_rX_final[node_rX_final$ego_id %in%
                node_rX_final[i,colnames(node_rX_final)[substr(colnames(node_rX_final),1,6) %in%
                c("ego_id","alt_id")]],"wealth"]))/length(na.omit(node_rX_final[node_rX_final$ego_id %in%
                node_rX_final[i,colnames(node_rX_final)[substr(colnames(node_rX_final),1,6) %in% c("ego_id","alt_id")]],"wealth"]))
                node_rX_final[i,]$everIsolated = ifelse(node_rX_final[i,]$everIsolated==1,1,ifelse(node_rX_final[i,]$degree<=isolationDegree,1,0))
                node_rX_final[i,]$maxDegreeLost = pmax(node_r0[i,]$initial_degree - node_rX_final[i,]$degree, node_rX_final[i,]$maxDegreeLost, na.rm=TRUE)
              }
              
              
              #Finalization of round X and Visualization
              #plot(graph.data.frame(link_rX[link_rX$connected==1,],directed=F)) #plot.igraph
              result[result$round==k,2:25] =
              c(length(node_rX_final$ego_id),length(node_rX_final[node_rX_final$group=="rich",]$ego_id),mean(node_rX_final$coop),mean(node_rX_final$degree),mean(node_rX_final$wealth),gini(node_rX_final$wealth),gmd(node_rX_final$wealth),mean(node_rX_final[node_rX_final$group=="rich",]$coop),mean(node_rX_final[node_rX_final$group=="rich",]$degree),mean(node_rX_final[node_rX_final$group=="rich",]$wealth),gini(node_rX_final[node_rX_final$group=="rich",]$wealth),gmd(node_rX_final[node_rX_final$group=="rich",]$wealth),mean(node_rX_final[node_rX_final$group=="poor",]$coop),mean(node_rX_final[node_rX_final$group=="poor",]$degree),mean(node_rX_final[node_rX_final$group=="poor",]$wealth),gini(node_rX_final[node_rX_final$group=="poor",]$wealth),gmd(node_rX_final[node_rX_final$group=="poor",]$wealth),
                                             as.numeric(ifelse(is.na(table(node_rX_final$degree<=isolationDegree)["TRUE"]),0,1)),
                                             as.numeric(sum(node_rX_final$everIsolated)/length(node_rX_final$ego_id)),
                prop.table(table(node_rX_final[node_rX_final$initial_coop==1]$coop))["0"],
                prop.table(table(node_rX_final[node_rX_final$initial_coop==0]$coop))["1"],
                suppressWarnings({mean(node_rX_final$maxDegreeLost,na.rm=TRUE)}),
                suppressWarnings({mean(node_rX_final[node_rX_final$initial_coop==1]$maxDegreeLost,na.rm=TRUE)}),
                suppressWarnings({mean(node_rX_final[node_rX_final$initial_coop==0]$maxDegreeLost,na.rm=TRUE)})
                )
              
              #For the loop
              node_import = node_rX_final
              colnames(node_import)[colnames(node_import) %in%
              c("coop","wealth","growth","degree","avg_env_wealth","local_gini","local_rate_coop","rel_rank")] =
              c("prev_coop","prev_wealth","prev_growth","prev_degree","prev_avg_env_wealth","prev_local_gini","prev_local_rate_coop","prev_rel_rank")
              link_import = link_rX
              #print(paste0("Round ",k," is done."))
              g_rX = graph_from_data_frame(link_rX[link_rX$connected==1,][1:2], directed = FALSE, vertices=node_rX_final)
              node_import$prev_closeness = closeness(g_rX)
            
            }
            
           
            trends.df = rbind(trends.df,cbind(result[c("round","gini","gmd","avg_wealth","avg_coop","avg_degree")],V,GINI,fractionCoop))
            
            link_rX_final = data.table::melt(setDT(node_rX_final),
                                     measure = patterns('alt_id'),
                                     variable.name = 'linkNumber', 
                                     value.name = c('alt_id'))
            link_rX_final = data.frame(link_rX_final)[c("ego_id","alt_id")]
            link_rX_final = link_rX_final[complete.cases(link_rX_final),]
            link_rX_final = data.frame(t(unique(apply(link_rX_final, 1, function(x) sort(x))))) %>% distinct(X1, X2)
            node_g_final = data.frame(node_rX_final)[c("ego_id","initial_coop","coop")]
            node_g_final$initial_coop = factor(node_g_final$initial_coop)
            
            g_rX_final = graph_from_data_frame(link_rX_final, directed = FALSE, vertices=node_g_final)
            g_r0 = graph_from_data_frame(link_r0[link_r0$connected==1,][1:2], directed = FALSE, vertices=node_r0)
            
            E(g_r0)$coopEdgeC = sapply(E(g_r0), function(e) prod(ifelse(V(g_r0)[inc(e)]$coop_rp=="C",1,0)))
            E(g_r0)$coopEdgeD = sapply(E(g_r0), function(e) prod(ifelse(V(g_r0)[inc(e)]$coop_rp=="D",1,0)))
            E(g_r0)$coopEdgeCD = sapply(E(g_r0), function(e) ifelse(sum(ifelse(V(g_r0)[inc(e)]$coop_rp=="C",1,0))==1,1,0))
            
            #C-assortativity, defined as number of observed C-C edges out of total possible C-C edges
            homophilyC[m] = sum(E(g_r0)$coopEdgeC) / (table(V(g_r0)$coop_rp)["C"]*(table(V(g_r0)$coop_rp)["C"]-1)/2)
            #D-assortativity, defined as number of observed C-C edges out of total possible C-C edges
            homophilyD[m] = sum(E(g_r0)$coopEdgeD) / (table(V(g_r0)$coop_rp)["D"]*(table(V(g_r0)$coop_rp)["D"]-1)/2)
            #heterophily, defined as number of observed C-D edges out of total possible C-D edges
            heterophily[m] = sum(E(g_r0)$coopEdgeCD) / (table(V(g_r0)$coop_rp)["C"]*table(V(g_r0)$coop_rp)["D"])
            
            coopFrac[m] = fractionCoop
            avgCoop[m] = prop.table(table(V(g_r0)$coop_rp))["C"]
            avgCoopFinal[m] = result[result$round==10,]$avg_coop
            percentIsolation[m] = max(result[result$round>=1,]$percentIsolation)
            isolation[m] = max(result[result$round>=1,]$isolation)
            #percentage of isolation among those who cooperated in both practice rounds
            percentIsolationC[m] = sum(node_rX_final[coop_rp_init==1,]$everIsolated)/length(node_rX_final[coop_rp_init==1,]$everIsolated)
            #percentage of isolation among those who defected at least once in practice rounds
            percentIsolationD[m] = sum(node_rX_final[coop_rp_init<=0.5,]$everIsolated)/length(node_rX_final[coop_rp_init<=0.5,]$everIsolated)
            
            nCommunities[m] = max(membership(cluster_louvain(g_rX_final)),na.rm=TRUE)
            communitySize[m] = mean(table(membership(cluster_louvain(g_rX_final))),na.rm=TRUE)
            assortativityInitial[m] = assortativity(g_r0, V(g_r0)$coop_rp == "C")
            assortativityFinal[m] = assortativity(g_rX_final, V(g_r0)$coop_rp == "C")
            conversionRate[m] = prop.table(table(V(g_rX_final)$coop == ifelse(V(g_r0)$coop_rp=="C","1","0")))["FALSE"]
            conversionToD[m] = prop.table(table(V(g_rX_final)$coop[V(g_r0)$coop_rp == "C"]))["0"]
            conversionToC[m] = prop.table(table(V(g_rX_final)$coop[V(g_r0)$coop_rp == "C"]))["1"]
            transitivity[m] = mean(transitivity(g_rX_final, type="global"),na.rm=TRUE)
            degree[m] = mean(igraph::degree(g_rX_final),na.rm=TRUE)
            degreeC[m] = mean(igraph::degree(g_r0)[coop_rp_init==1],na.rm=TRUE)
            degreeD[m] = mean(igraph::degree(g_r0)[coop_rp_init<=0.5],na.rm=TRUE)
            meanConversionToD[m] = mean(result[result$round>=2,]$meanConversionToD, na.rm=TRUE)
            meanConversionToC[m] = mean(result[result$round>=2,]$meanConversionToC, na.rm=TRUE)
            degreeLost[m] = result[result$round==10,]$degreeLost
            degreeLostC[m] = result[result$round==10,]$degreeLostC
            degreeLostD[m] = result[result$round==10,]$degreeLostD
            avg_wealth[m] = result[result$round==10,]$avg_wealth
            gini[m] = result[result$round==10,]$gini
        
          }
          
        df.netIntLowDegree = rbind(df.netIntLowDegree,
                          data.frame(
                            coopFrac = coopFrac,
                            avgCoop = avgCoop,
                            avgCoopFinal = avgCoopFinal,
                            percentIsolation = percentIsolation,
                            isolation = isolation,
                            percentIsolationC = percentIsolationC,
                            percentIsolationD = percentIsolationD,
                            nCommunities = nCommunities,
                            communitySize = communitySize,
                            assortativityInitial = assortativityInitial,
                            assortativityFinal = assortativityFinal,
                            conversionRate = conversionRate,
                            conversionToD = conversionToD, 
                            conversionToC = conversionToC, 
                            homophilyC = homophilyC,
                            homophilyD = homophilyD,
                            heterophily = heterophily,
                            transitivity = transitivity, 
                            degree = degree, 
                            degreeC = degreeC, 
                            degreeD = degreeD,
                            meanConversionToD = meanConversionToD, 
                            meanConversionToC = meanConversionToC,
                            degreeLost = degreeLost,
                            degreeLostC = degreeLostC,
                            degreeLostD = degreeLostD,
                            avg_wealth = avg_wealth,
                            gini = gini
                            ))
        #plot(g_r0,vertex.color=V(g_rX_final)$initial_coop,vertex.label=ifelse(is.na(V(g_rX_final)$initial_coop),"NA",ifelse(V(g_rX_final)$initial_coop==1,"C","D")),main=paste("fracCoop=",frac,", round 0",sep=""))
        #plot(g_rX_final,vertex.color=V(g_rX_final)$initial_coop,vertex.label=ifelse(is.na(V(g_rX_final)$initial_coop),"NA",ifelse(V(g_rX_final)$initial_coop==1,"C","D")),main=paste("fracCoop=",frac,", final round",sep=""))
        
      }
      
    sum.netIntLowDegree <- data.frame(
      df.netIntLowDegree %>% 
        group_by(coopFrac) %>%
          summarise(
            mean.isolation = mean(isolation),
            ci.isolation   = 1.96 * sd(isolation)/sqrt(n()),
            mean.percentIsolation = mean(percentIsolation),
            ci.percentIsolation   = 1.96 * sd(percentIsolation)/sqrt(n()),
            mean.percentIsolationC = mean(percentIsolationC,na.rm=TRUE),
            ci.percentIsolationC   = 1.96 * sd(percentIsolationC,na.rm=TRUE)/sqrt(sum(isolation)),
            mean.percentIsolationD = mean(percentIsolationD,na.rm=TRUE),
            ci.percentIsolationD   = 1.96 * sd(percentIsolationD,na.rm=TRUE)/sqrt(sum(isolation)),
            mean.avgCoop = mean(avgCoop,na.rm=TRUE),
            ci.avgCoop   = 1.96 * sd(avgCoop,na.rm=TRUE)/sqrt(n()),
            mean.avgCoopFinal = mean(avgCoopFinal,na.rm=TRUE),
            ci.avgCoopFinal   = 1.96 * sd(avgCoopFinal,na.rm=TRUE)/sqrt(n()),
            mean.nCommunities = mean(nCommunities,na.rm=TRUE),
            ci.nCommunities   = 1.96 * sd(nCommunities,na.rm=TRUE)/sqrt(n()),
            mean.communitySize = mean(communitySize,na.rm=TRUE),
            ci.communitySize   = 1.96 * sd(communitySize,na.rm=TRUE)/sqrt(n()),
            mean.assortativityInitial = mean(assortativityInitial,na.rm=TRUE),
            ci.assortativityInitial   = 1.96 * sd(assortativityInitial,na.rm=TRUE)/sqrt(n()),
            mean.assortativityFinal = mean(assortativityFinal,na.rm=TRUE),
            ci.assortativityFinal   = 1.96 * sd(assortativityFinal,na.rm=TRUE)/sqrt(n()),
            mean.conversionRate = mean(conversionRate,na.rm=TRUE),
            ci.conversionRate   = 1.96 * sd(conversionRate,na.rm=TRUE)/sqrt(n()),
            mean.conversionToD = mean(conversionToD,na.rm=TRUE),
            ci.conversionToD   = 1.96 * sd(conversionToD,na.rm=TRUE)/sqrt(n()),
            mean.conversionToC = mean(conversionToC,na.rm=TRUE),
            ci.conversionToC   = 1.96 * sd(conversionToC,na.rm=TRUE)/sqrt(n()),
            mean.homophilyC = mean(homophilyC,na.rm=TRUE),
            ci.homophilyC   = 1.96 * sd(homophilyC,na.rm=TRUE)/sqrt(n()),
            mean.homophilyD = mean(homophilyD,na.rm=TRUE),
            ci.homophilyD   = 1.96 * sd(homophilyD,na.rm=TRUE)/sqrt(n()),
            mean.heterophily = mean(heterophily,na.rm=TRUE),
            ci.heterophily   = 1.96 * sd(heterophily,na.rm=TRUE)/sqrt(n()),
            mean.transitivity = mean(transitivity,na.rm=TRUE),
            ci.transitivity   = 1.96 * sd(transitivity,na.rm=TRUE)/sqrt(n()),
            mean.degree = mean(degree,na.rm=TRUE),
            ci.degree   = 1.96 * sd(degree,na.rm=TRUE)/sqrt(n()),
            mean.degreeC = mean(degreeC,na.rm=TRUE),
            ci.degreeC   = 1.96 * sd(degreeC,na.rm=TRUE)/sqrt(n()),
            mean.degreeD = mean(degreeD,na.rm=TRUE),
            ci.degreeD   = 1.96 * sd(degreeD,na.rm=TRUE)/sqrt(n()),
            mean.meanConversionToD = mean(meanConversionToD,na.rm=TRUE),
            ci.meanConversionToD   = 1.96 * sd(meanConversionToD,na.rm=TRUE)/sqrt(n()),
            mean.meanConversionToC = mean(meanConversionToC,na.rm=TRUE),
            ci.meanConversionToC   = 1.96 * sd(meanConversionToC,na.rm=TRUE)/sqrt(n()),
            mean.degreeLost = mean(degreeLost,na.rm=TRUE),
            ci.degreeLost   = 1.96 * sd(degreeLost,na.rm=TRUE)/sqrt(n()),
            mean.degreeLostC = mean(degreeLostC,na.rm=TRUE),
            ci.degreeLostC   = 1.96 * sd(degreeLostC,na.rm=TRUE)/sqrt(n()),
            mean.degreeLostD = mean(degreeLostD,na.rm=TRUE),
            ci.degreeLostD   = 1.96 * sd(degreeLostD,na.rm=TRUE)/sqrt(n()),
            mean.avg_wealth = mean(avg_wealth,na.rm=TRUE),
            ci.avg_wealth   = 1.96 * sd(avg_wealth,na.rm=TRUE)/sqrt(n()),
            mean.gini = mean(gini,na.rm=TRUE),
            ci.gini   = 1.96 * sd(gini,na.rm=TRUE)/sqrt(n())
            )
      )
          
    kable(sum.netIntLowDegree[c(1:9)]) %>% kableExtra::kable_styling(font_size = 10)
    kable(sum.netIntLowDegree[c(1,10:17)]) %>% kableExtra::kable_styling(font_size = 10) 
    kable(sum.netIntLowDegree[c(1,18:25)]) %>% kableExtra::kable_styling(font_size = 10) 
    kable(sum.netIntLowDegree[c(1,26:33)]) %>% kableExtra::kable_styling(font_size = 10) 
    kable(sum.netIntLowDegree[c(1,34:ncol(sum.netIntLowDegree))]) %>% kableExtra::kable_styling(font_size = 10) 
    
    compare_means(percentIsolation ~ coopFrac, data=df.netIntLowDegree)
    compare_means(avgCoop ~ coopFrac, data=df.netIntLowDegree)
    compare_means(avgCoopFinal ~ coopFrac, data=df.netIntLowDegree)
    compare_means(nCommunities ~ coopFrac, data=df.netIntLowDegree)
    compare_means(communitySize ~ coopFrac, data=df.netIntLowDegree)
    compare_means(assortativityInitial ~ coopFrac, data=df.netIntLowDegree)
    compare_means(assortativityFinal ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(conversionRate ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(conversionToD ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(conversionToC ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(degreeC ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(degreeD ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(meanConversionToD ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(meanConversionToC ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(degreeLost ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(degreeLostC ~ coopFrac, data=df.netIntLowDegree)
    #compare_means(degreeLostD ~ coopFrac, data=df.netIntLowDegree)
    
    summary(lm(percentIsolation ~ assortativityInitial, data=df.netIntLowDegree))
    
    #plot(df.netIntLowDegree$assortativityInitial, df.netIntLowDegree$percentIsolation)
    
    
    
    #percentIsolation
    g.percentIsolation = ggbarplot(data=df.netIntLowDegree, x="coopFrac", y="percentIsolation", add = "mean_se", color="coopFrac") +
      stat_compare_means(ref.group = "0", label = "p.signif", label.y = 0.098, method="t.test", color="black") +  
      labs(
        title = paste("Isolation when defectors are assigned to 25% of nodes by degree, ","V=",V,", Gini=",GINI,sep=""),
        x = "Closeness centrality percentile of nodes assigned to defectors ",
        y = "Propoption of ever-isolated individuals") +
      annotate("text", x=1, y=0.0990, label= "ref", color="black") +
      annotate("text", x=2.4, y= -0.0022, label= "Lowest degree nodes assigned to defectors", size=2.5) +
      geom_segment(aes(x = 3.3, y = -0.0024, xend = 3.7, yend = -0.0024), linewidth=0.2, arrow = arrow(length = unit(0.1, "cm"))) +
      annotate("text", x=4.6, y= -0.0022, label= "Highest degree nodes assigned to defectors", size=2.5) +
      theme_bw() +
      theme(plot.title = element_text(hjust = 0.5, size=12),legend.position="none") +
      coord_cartesian(ylim=c(0,0.10)) + 
      scale_x_discrete(labels=c('Control','0-25','25-50','50-75','75-100')) +
      scale_color_manual(values = c('0' = "black",'0.25'="black",'0.5'="black",'0.75'="black",'1'="black")) +
      geom_vline(xintercept = 1.5, linetype = "longdash")
    print(g.percentIsolation)
    
    #percentIsolationC
    #percentage of isolation among those who cooperated in both practice rounds
    g.percentIsolationC = ggbarplot(data=df.netIntLowDegree, x="coopFrac", y="percentIsolationC", add = "mean_se") +
      stat_compare_means(ref.group = "0", label = "p.signif", label.y = 0.098, method="t.test", color="black") +  
      labs(
        title = paste("Isolation among initial cooperators, ","V=",V,", Gini=",GINI,sep=""),
        x = "Closeness centrality percentile of nodes assigned to defectors ",
        y = "Propoption of ever-isolated individuals") +
      annotate("text", x=1, y=0.0990, label= "ref", color="black") +
      annotate("text", x=2.4, y= -0.0022, label= "Lowest degree nodes assigned to defectors", size=2.5) +
      geom_segment(aes(x = 3.3, y = -0.0024, xend = 3.7, yend = -0.0024), linewidth=0.2, arrow = arrow(length = unit(0.1, "cm"))) +
      annotate("text", x=4.6, y= -0.0022, label= "Highest degree nodes assigned to defectors", size=2.5) +
      theme_bw() +
      theme(plot.title = element_text(hjust = 0.5, size=12),legend.position="none") +
      coord_cartesian(ylim=c(0,0.10)) + 
      scale_x_discrete(labels=c('Control','0-25','25-50','50-75','75-100')) +
      scale_color_manual(values = c('0' = "black",'0.25'="black",'0.5'="black",'0.75'="black",'1'="black")) +
      geom_vline(xintercept = 1.5, linetype = "longdash")
    print(g.percentIsolationC)
    
    #percentIsolationD
    #percentage of isolation among those who defected at least once in practice rounds
    g.percentIsolationD = ggbarplot(data=df.netIntLowDegree, x="coopFrac", y="percentIsolationD", add = "mean_se") +
      stat_compare_means(ref.group = "0", label = "p.signif", label.y = 0.298, method="t.test", color="black") +  
      labs(
        title = paste("Isolation among initial defectors, ","V=",V,", Gini=",GINI,sep=""),
        x = "Closeness centrality percentile of nodes assigned to defectors ",
        y = "Propoption of ever-isolated individuals") +
      annotate("text", x=1, y=0.2990, label= "ref", color="black") +
      annotate("text", x=2.4, y= -0.0062, label= "Lowest degree nodes assigned to defectors", size=2.5) +
      geom_segment(aes(x = 3.3, y = -0.0064, xend = 3.7, yend = -0.0064), linewidth=0.2, arrow = arrow(length = unit(0.1, "cm"))) +
      annotate("text", x=4.6, y= -0.0062, label= "Highest degree nodes assigned to defectors", size=2.5) +
      theme_bw() +
      theme(plot.title = element_text(hjust = 0.5, size=12),legend.position="none") +
      coord_cartesian(ylim=c(0,0.30)) + 
      scale_x_discrete(labels=c('Control','0-25','25-50','50-75','75-100')) +
      scale_color_manual(values = c('0' = "black",'0.25'="black",'0.5'="black",'0.75'="black",'1'="black")) +
      geom_vline(xintercept = 1.5, linetype = "longdash")
    print(g.percentIsolationD)
      
    #avgCoopFinal
    g.avgCoopFinal = ggbarplot(data=df.netIntLowDegree, x="coopFrac", y="avgCoopFinal", add = "mean_se") +
      stat_compare_means(ref.group = "0", label = "p.signif", label.y = 0.98, method="t.test", color="black") +  
      labs(
        title = paste("Cooperation in final round, ","V=",V,", Gini=",GINI,sep=""),
        x = "Closeness centrality percentile of nodes assigned to defectors ",
        y = "Propoption of cooperators in final round") +
      annotate("text", x=1, y=0.990, label= "ref", color="black") +
      annotate("text", x=2.4, y= -0.0212, label= "Lowest degree nodes assigned to defectors", size=2.5) +
      geom_segment(aes(x = 3.3, y = -0.0214, xend = 3.7, yend = -0.0214), linewidth=0.2, arrow = arrow(length = unit(0.1, "cm"))) +
      annotate("text", x=4.6, y= -0.0212, label= "Highest degree nodes assigned to defectors", size=2.5) +
      theme_bw() +
      theme(plot.title = element_text(hjust = 0.5, size=12),legend.position="none") +
      coord_cartesian(ylim=c(0,1.0)) + 
      scale_x_discrete(labels=c('Control','0-25','25-50','50-75','75-100')) +
      scale_color_manual(values = c('0' = "black",'0.25'="black",'0.5'="black",'0.75'="black",'1'="black")) +
      geom_vline(xintercept = 1.5, linetype = "longdash")
    print(g.avgCoopFinal)
    
    #avg_wealth
    g.avg_wealth = ggbarplot(data=df.netIntLowDegree, x="coopFrac", y="avg_wealth", add = "mean_se") +
      stat_compare_means(ref.group = "0", label = "p.signif", label.y = 6800, method="t.test", color="black") +  
      labs(
        title = paste("Wealth in final round, ","V=",V,", Gini=",GINI,sep=""),
        x = "Closeness centrality percentile of nodes assigned to defectors ",
        y = "Average wealth in final round") +
      annotate("text", x=1, y=6900, label= "ref", color="black") +
      annotate("text", x=2.4, y= -162, label= "Lowest degree nodes assigned to defectors", size=2.5) +
      geom_segment(aes(x = 3.3, y = -164, xend = 3.7, yend = -164), linewidth=0.2, arrow = arrow(length = unit(0.1, "cm"))) +
      annotate("text", x=4.6, y= -162, label= "Highest degree nodes assigned to defectors", size=2.5) +
      theme_bw() +
      theme(plot.title = element_text(hjust = 0.5, size=12),legend.position="none") +
      coord_cartesian(ylim=c(0,7000)) + 
      scale_x_discrete(labels=c('Control','0-25','25-50','50-75','75-100')) +
      scale_color_manual(values = c('0' = "black",'0.25'="black",'0.5'="black",'0.75'="black",'1'="black")) +
      geom_vline(xintercept = 1.5, linetype = "longdash")
    print(g.avg_wealth)
    
    #gini
    g.gini = ggbarplot(data=df.netIntLowDegree, x="coopFrac", y="gini", add = "mean_se") +
      stat_compare_means(ref.group = "0", label = "p.signif", label.y = 0.48, method="t.test", color="black") +  
      labs(
        title = paste("Gini coefficient in final round, ","V=",V,", Gini=",GINI,sep=""),
        x = "Closeness centrality percentile of nodes assigned to defectors ",
        y = "Gini coefficient in final round") +
      annotate("text", x=1, y=0.490, label= "ref", color="black") +
      annotate("text", x=2.4, y= -0.0112, label= "Lowest degree nodes assigned to defectors", size=2.5) +
      geom_segment(aes(x = 3.3, y = -0.0114, xend = 3.7, yend = -0.0114), linewidth=0.2, arrow = arrow(length = unit(0.1, "cm"))) +
      annotate("text", x=4.6, y= -0.0112, label= "Highest degree nodes assigned to defectors", size=2.5) +
      theme_bw() +
      theme(plot.title = element_text(hjust = 0.5, size=12),legend.position="none") +
      coord_cartesian(ylim=c(0,0.50)) + 
      scale_x_discrete(labels=c('Control','0-25','25-50','50-75','75-100')) +
      scale_color_manual(values = c('0' = "black",'0.25'="black",'0.5'="black",'0.75'="black",'1'="black")) +
      geom_vline(xintercept = 1.5, linetype = "longdash")
    print(g.gini)
    
    #degree
    g.degree = ggbarplot(data=df.netIntLowDegree, x="coopFrac", y="degree", add = "mean_se") +
      stat_compare_means(ref.group = "0", label = "p.signif", label.y = 14.8, method="t.test", color="black") +  
      labs(
        title = paste("Degree in final round, ","V=",V,", Gini=",GINI,sep=""),
        x = "Closeness centrality percentile of nodes assigned to defectors ",
        y = "Mean degree in final round") +
      annotate("text", x=1, y=14.90, label= "ref", color="black") +
      annotate("text", x=2.4, y= -0.312, label= "Lowest degree nodes assigned to defectors", size=2.5) +
      geom_segment(aes(x = 3.3, y = -0.314, xend = 3.7, yend = -0.314), linewidth=0.2, arrow = arrow(length = unit(0.1, "cm"))) +
      annotate("text", x=4.6, y= -0.312, label= "Highest degree nodes assigned to defectors", size=2.5) +
      theme_bw() +
      theme(plot.title = element_text(hjust = 0.5, size=12),legend.position="none") +
      coord_cartesian(ylim=c(0,15)) + 
      scale_x_discrete(labels=c('Control','0-25','25-50','50-75','75-100')) +
      scale_color_manual(values = c('0' = "black",'0.25'="black",'0.5'="black",'0.75'="black",'1'="black")) +
      geom_vline(xintercept = 1.5, linetype = "longdash")
    print(g.degree)
    
    #transitivity
    g.transitivity = ggbarplot(data=df.netIntLowDegree, x="coopFrac", y="transitivity", add = "mean_se") +
      stat_compare_means(ref.group = "0", label = "p.signif", label.y = 0.98, method="t.test", color="black") +  
      labs(
        title = paste("Transitivity in final round, ","V=",V,", Gini=",GINI,sep=""),
        x = "Closeness centrality percentile of nodes assigned to defectors ",
        y = "Transitivity in final round") +
      annotate("text", x=1, y=0.99, label= "ref", color="black") +
      annotate("text", x=2.4, y= -0.0212, label= "Lowest degree nodes assigned to defectors", size=2.5) +
      geom_segment(aes(x = 3.3, y = -0.0214, xend = 3.7, yend = -0.0214), linewidth=0.2, arrow = arrow(length = unit(0.1, "cm"))) +
      annotate("text", x=4.6, y= -0.0212, label= "Highest degree nodes assigned to defectors", size=2.5) +
      theme_bw() +
      theme(plot.title = element_text(hjust = 0.5, size=12),legend.position="none") +
      coord_cartesian(ylim=c(0,1.00)) + 
      scale_x_discrete(labels=c('Control','0-25','25-50','50-75','75-100')) +
      scale_color_manual(values = c('0' = "black",'0.25'="black",'0.5'="black",'0.75'="black",'1'="black")) +
      geom_vline(xintercept = 1.5, linetype = "longdash")
    print(g.transitivity)
    
    #initial C-assortativity     
    plotList <- lapply(
              unique(df.netIntLowDegree$coopFrac),
              function(key) {
                if(key==0){
                  ggplot(data = df.netIntLowDegree[df.netIntLowDegree$coopFrac==key,], aes(x = homophilyC, y = percentIsolation)) + 
                      geom_point() + 
                      scale_x_continuous(paste("C-assortativity, ","Control",sep="")) +
                      scale_y_continuous("Proportion isolated") +
                      geom_smooth(method='lm', formula= y~x) + 
                      stat_cor(method = "pearson")
                }
                else{
                  ggplot(data = df.netIntLowDegree[df.netIntLowDegree$coopFrac==key,], aes(x = homophilyC, y = percentIsolation)) + 
                      geom_point() + 
                      scale_x_continuous(paste("C-assortativity, degree %ile = ",key,sep="")) +
                      scale_y_continuous("Proportion isolated") +
                      geom_smooth(method='lm', formula= y~x) + 
                      stat_cor(method = "pearson")
                }
              }
    )
    plot= ggarrange(plotlist=plotList)
    print(annotate_figure(plot, top = text_grob(paste("Proportion of ever-isolated individuals, ","V=",V,", Gini=", GINI, sep=""), color = "black", face = "bold", size = 10)))
    
    lapply(unique(df.netIntLowDegree$coopFrac),
              function(key) {
                if(key==0){
                  reg = lm(percentIsolation ~ homophilyC + degreeD, data=df.netIntLowDegree[df.netIntLowDegree$coopFrac==key,])
                  print(paste("Regression on proportion of ever-isolated individuals, ","Control"," ; ",sep=""))
                  print(summary(reg)[4]$coefficients)
                }
                else{
                  reg = lm(percentIsolation ~ homophilyC + degreeD, data=df.netIntLowDegree[df.netIntLowDegree$coopFrac==key,])
                  print(paste("Regression on proportion of ever-isolated individuals, degree %ile = ",key," ; ",sep=""))
                  print(summary(reg)[4]$coefficients)
                }
              }
    )
    
    
    
    #initial D-assortativity     
    plotList <- lapply(
              unique(df.netIntLowDegree$coopFrac),
              function(key) {
                if(key==0){
                  ggplot(data = df.netIntLowDegree[df.netIntLowDegree$coopFrac==key,], aes(x = homophilyD, y = percentIsolation)) + 
                      geom_point() +
                      scale_x_continuous(paste("D-assortativity, ","Control",sep="")) + 
                      scale_y_continuous("Proportion isolated") +
                      geom_smooth(method='lm', formula= y~x) + 
                      stat_cor(method = "pearson")
                }
                else{
                  ggplot(data = df.netIntLowDegree[df.netIntLowDegree$coopFrac==key,], aes(x = homophilyD, y = percentIsolation)) + 
                      geom_point() +
                      scale_x_continuous(paste("D-assortativity, degree %ile = ",key,sep="")) + 
                      scale_y_continuous("Proportion isolated") +
                      geom_smooth(method='lm', formula= y~x) + 
                      stat_cor(method = "pearson")
                }
              }
    )
    plot= ggarrange(plotlist=plotList)
    print(annotate_figure(plot, top = text_grob(paste("Proportion of ever-isolated individuals, ","V=",V,", Gini=", GINI, sep=""), color = "black", face = "bold", size = 10)))
    
    lapply(unique(df.netIntLowDegree$coopFrac),
              function(key) {
                if(key==0){
                  reg = lm(percentIsolation ~ homophilyD + degreeD, data=df.netIntLowDegree[df.netIntLowDegree$coopFrac==key,])
                  print(paste("Regression on proportion of ever-isolated individuals, ","Control"," ; ",sep=""))
                  print(summary(reg)[4]$coefficients)
                }
                else{
                  reg = lm(percentIsolation ~ homophilyD + degreeD, data=df.netIntLowDegree[df.netIntLowDegree$coopFrac==key,])
                  print(paste("Regression on proportion of ever-isolated individuals, degree %ile = ",key," ; ",sep=""))
                  print(summary(reg)[4]$coefficients)
                }
              }
    )
    
    }
}

## Loading data last updated on  2023-01-20 20:37:15 
## Call model1.invisible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 20:39:47 
## Call model2.invisible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 22:02:59 
## Call model3(redo=TRUE) to update data.

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning: Removed 1 rows containing non-finite values (`stat_summary()`).

## Warning: Removed 1 rows containing non-finite values (`stat_compare_means()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.15721723 0.016211154  9.698090 1.765017e-20
## homophilyC  -0.03242498 0.031778198 -1.020353 3.080585e-01
## degreeD     -0.01847735 0.002611508 -7.075358 5.108727e-12
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.15415896 0.013702110 11.2507462 2.572969e-26
## homophilyC  -0.02027638 0.040822723 -0.4966936 6.196248e-01
## degreeD     -0.01546004 0.003155982 -4.8986473 1.307637e-06
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.17095448 0.015632796 10.935631 4.334479e-25
## homophilyC  -0.02262882 0.038688893 -0.584892 5.588858e-01
## degreeD     -0.02221935 0.003730253 -5.956527 4.879936e-09
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.14985144 0.015091086  9.929798 2.558355e-21
## homophilyC  -0.04764612 0.036933315 -1.290058 1.976304e-01
## degreeD     -0.01756671 0.003284622 -5.348169 1.357635e-07
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.084302817 0.014297195  5.8964587 6.866022e-09
## homophilyC  -0.018504313 0.030814960 -0.6004977 5.484483e-01
## degreeD     -0.006466152 0.002569778 -2.5162292 1.217572e-02

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 1 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 1 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.14530203 0.013176443 11.0274091 1.957591e-25
## homophilyD  -0.01397525 0.020980906 -0.6660936 5.056616e-01
## degreeD     -0.01712792 0.003333034 -5.1388372 3.985234e-07
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.15776577 0.012237041 12.892477 5.285932e-33
## homophilyD  -0.02677454 0.018818668 -1.422765 1.554329e-01
## degreeD     -0.01576518 0.002921816 -5.395677 1.059249e-07
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                Estimate Std. Error   t value     Pr(>|t|)
## (Intercept)  0.17520166 0.01507278 11.623709 8.686405e-28
## homophilyD  -0.03281136 0.01811494 -1.811287 7.070120e-02
## degreeD     -0.02244546 0.00344213 -6.520805 1.725287e-10
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.14416561 0.014619974  9.8608664 4.619649e-21
## homophilyD   0.01482319 0.016394845  0.9041373 3.663624e-01
## degreeD     -0.02021382 0.003120186 -6.4784021 2.240702e-10
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                 Estimate Std. Error    t value     Pr(>|t|)
## (Intercept)  0.082052348 0.01425447  5.7562538 1.506719e-08
## homophilyD   0.007540888 0.01494158  0.5046915 6.139992e-01
## degreeD     -0.007371411 0.00233479 -3.1572055 1.689665e-03
## Loading data last updated on  2023-01-20 21:50:22 
## Call model1.visible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 21:54:00 
## Call model2.visible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 22:02:59 
## Call model3(redo=TRUE) to update data.

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning: Removed 1 rows containing non-finite values (`stat_summary()`).

## Warning: Removed 1 rows containing non-finite values (`stat_compare_means()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.15183304 0.014454328 10.504331 1.931068e-23
## homophilyC  -0.03757887 0.029297676 -1.282657 2.002114e-01
## degreeD     -0.02133913 0.002291528 -9.312185 4.062481e-19
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.18727540 0.013052830 14.347494 2.613522e-39
## homophilyC  -0.14331357 0.039837602 -3.597445 3.535127e-04
## degreeD     -0.02035613 0.003007671 -6.768071 3.686678e-11
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.16828618 0.012558427 13.400259 3.560758e-35
## homophilyC  -0.05079564 0.034421110 -1.475712 1.406545e-01
## degreeD     -0.02587769 0.002931292 -8.828082 1.825577e-17
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.11831559 0.013218133  8.9510056 7.029111e-18
## homophilyC  -0.02301923 0.029268225 -0.7864923 4.319540e-01
## degreeD     -0.01643700 0.002846449 -5.7745616 1.360959e-08
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                 Estimate Std. Error   t value     Pr(>|t|)
## (Intercept)  0.103519998 0.01143284  9.054614 3.121935e-18
## homophilyC  -0.007849712 0.02462461 -0.318775 7.500310e-01
## degreeD     -0.013013427 0.00196911 -6.608786 1.000411e-10

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 1 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.139324970 0.011647322 11.9619749 3.826354e-29
## homophilyD  -0.003886736 0.020208488 -0.1923318 8.475612e-01
## degreeD     -0.020846701 0.003026866 -6.8872225 1.733098e-11
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.16577110 0.011702943 14.164907 1.672917e-38
## homophilyD  -0.02379993 0.019808549 -1.201498 2.301303e-01
## degreeD     -0.02391639 0.002851124 -8.388407 5.134527e-16
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                Estimate  Std. Error     t value     Pr(>|t|)
## (Intercept)  0.16456958 0.012034601  13.6747013 2.379639e-36
## homophilyD  -0.01503936 0.015447366  -0.9735874 3.307360e-01
## degreeD     -0.02740649 0.002675176 -10.2447432 1.801216e-22
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.115866615 0.012833708  9.0283039 3.838832e-18
## homophilyD  -0.002766689 0.015399250 -0.1796639 8.574897e-01
## degreeD     -0.017210407 0.002707976 -6.3554506 4.706224e-10
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                  Estimate  Std. Error     t value     Pr(>|t|)
## (Intercept)  0.1025813816 0.011411301  8.98945539 5.263242e-18
## homophilyD   0.0009542362 0.012650269  0.07543209 9.399014e-01
## degreeD     -0.0132773834 0.001820399 -7.29366491 1.205078e-12
## Loading data last updated on  2023-01-20 20:37:15 
## Call model1.invisible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 20:39:47 
## Call model2.invisible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 22:02:59 
## Call model3(redo=TRUE) to update data.

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning: Removed 1 rows containing non-finite values (`stat_summary()`).

## Warning: Removed 1 rows containing non-finite values (`stat_compare_means()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.15851791 0.016024853  9.8920044 3.536086e-21
## homophilyC  -0.02777185 0.032480994 -0.8550186 3.929536e-01
## degreeD     -0.01844878 0.002540512 -7.2618360 1.487397e-12
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.16766555 0.013724791 12.216255 3.397531e-30
## homophilyC  -0.11480846 0.041888447 -2.740814 6.349393e-03
## degreeD     -0.01189691 0.003162506 -3.761860 1.887529e-04
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.16641078 0.015260045 10.9049993 5.689328e-25
## homophilyC  -0.03728589 0.041825913 -0.8914543 3.731169e-01
## degreeD     -0.01957622 0.003561883 -5.4960302 6.216702e-08
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.10431851 0.016083954  6.4858743 2.133466e-10
## homophilyC  -0.00965795 0.035613863 -0.2711851 7.863612e-01
## degreeD     -0.00979594 0.003463587 -2.8282642 4.869116e-03
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.106649090 0.014131553  7.5468770 2.144412e-13
## homophilyC  -0.029247250 0.030437219 -0.9609041 3.370676e-01
## degreeD     -0.009559281 0.002433916 -3.9275314 9.795460e-05

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 1 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.14734797 0.012886215 11.4345428 4.976651e-27
## homophilyD  -0.01427898 0.022358008 -0.6386519 5.233448e-01
## degreeD     -0.01695236 0.003348825 -5.0621811 5.855369e-07
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.147944058 0.012255720 12.0714289 1.330819e-29
## homophilyD  -0.007858681 0.020744187 -0.3788377 7.049702e-01
## degreeD     -0.015008629 0.002985795 -5.0266784 6.976943e-07
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.15882038 0.014595669 10.8813360 7.094027e-25
## homophilyD   0.01659103 0.018734700  0.8855778 3.762742e-01
## degreeD     -0.02149524 0.003244477 -6.6251774 9.051835e-11
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                 Estimate Std. Error   t value     Pr(>|t|)
## (Intercept)  0.105136549 0.01556015  6.756780 3.959457e-11
## homophilyD  -0.032712121 0.01867073 -1.752054 8.038131e-02
## degreeD     -0.008597146 0.00328327 -2.618471 9.102076e-03
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.10553469 0.014097622  7.4859920 3.275707e-13
## homophilyD  -0.01110077 0.015628254 -0.7103012 4.778519e-01
## degreeD     -0.01023769 0.002248938 -4.5522343 6.688307e-06
## Loading data last updated on  2023-01-20 21:50:22 
## Call model1.visible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 21:54:00 
## Call model2.visible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 22:02:59 
## Call model3(redo=TRUE) to update data.

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning: Removed 1 rows containing non-finite values (`stat_summary()`).

## Warning: Removed 1 rows containing non-finite values (`stat_compare_means()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.16845954 0.014239102  11.83077 1.280286e-28
## homophilyC  -0.06814847 0.028861432  -2.36123 1.860016e-02
## degreeD     -0.02273282 0.002257406 -10.07032 7.916384e-22
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.18664227 0.013223825 14.114091 2.799636e-38
## homophilyC  -0.15141597 0.040359485 -3.751682 1.963622e-04
## degreeD     -0.01955013 0.003047072 -6.416039 3.264051e-10
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.16146624 0.012098660 13.345795 6.101536e-35
## homophilyC  -0.08653724 0.033160943 -2.609613 9.337781e-03
## degreeD     -0.02209192 0.002823977 -7.822983 3.120574e-14
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.11596321 0.011993108  9.6691541 2.223475e-20
## homophilyC  -0.02431360 0.026555715 -0.9155695 3.603367e-01
## degreeD     -0.01635591 0.002582647 -6.3330011 5.385754e-10
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.10005992 0.011188770  8.9428878 7.488546e-18
## homophilyC  -0.01762508 0.024098913 -0.7313641 4.649015e-01
## degreeD     -0.01216801 0.001927072 -6.3142444 6.026388e-10

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 1 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.15034009 0.011507355 13.064695 1.006971e-33
## homophilyD   0.02019359 0.019965641  1.011417 3.123111e-01
## degreeD     -0.02451522 0.002990492 -8.197722 2.117160e-15
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.16113543 0.011881941 13.561373 7.196146e-36
## homophilyD  -0.01262447 0.020111523 -0.627723 5.304737e-01
## degreeD     -0.02360170 0.002894733 -8.153327 2.905646e-15
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.15226359 0.011651958 13.0676402 9.588742e-34
## homophilyD  -0.01150241 0.014956212 -0.7690721 4.422166e-01
## degreeD     -0.02504153 0.002590118 -9.6681018 2.258976e-20
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.112644918 0.011641745  9.6759478 2.102638e-20
## homophilyD   0.009585474 0.013969006  0.6861959 4.929096e-01
## degreeD     -0.017776675 0.002456466 -7.2366870 1.754813e-12
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.10031358 0.011163199  8.9860960 5.403341e-18
## homophilyD  -0.01155875 0.012375230 -0.9340229 3.507475e-01
## degreeD     -0.01249537 0.001780821 -7.0166337 7.512793e-12
## Loading data last updated on  2023-01-20 20:37:15 
## Call model1.invisible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 20:39:47 
## Call model2.invisible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 22:02:59 
## Call model3(redo=TRUE) to update data.

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning: Removed 1 rows containing non-finite values (`stat_summary()`).

## Warning: Removed 1 rows containing non-finite values (`stat_compare_means()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.15694230 0.016392636  9.573951 4.885753e-20
## homophilyC  -0.04027299 0.033226459 -1.212076 2.260604e-01
## degreeD     -0.01720200 0.002598819 -6.619162 9.396739e-11
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.16623310 0.014211639 11.696969 4.360415e-28
## homophilyC  -0.11489591 0.043374319 -2.648939 8.331453e-03
## degreeD     -0.01097368 0.003274687 -3.351062 8.663149e-04
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.17118407 0.014583175 11.738464 2.970905e-28
## homophilyC  -0.07392632 0.039970694 -1.849513 6.497726e-02
## degreeD     -0.01793519 0.003403893 -5.269021 2.047384e-07
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                Estimate Std. Error     t value     Pr(>|t|)
## (Intercept)  0.11308177 0.01655725  6.82974171 2.492205e-11
## homophilyC  -0.00243358 0.03666187 -0.06637906 9.471027e-01
## degreeD     -0.01178602 0.00356551 -3.30556380 1.016361e-03
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                 Estimate Std. Error   t value     Pr(>|t|)
## (Intercept)  0.114850395 0.01426970  8.048549 6.218387e-15
## homophilyC  -0.053580359 0.03073477 -1.743314 8.189715e-02
## degreeD     -0.009194377 0.00245771 -3.741035 2.046319e-04

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 1 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.143453337 0.013196947 10.8701914 7.915218e-25
## homophilyD  -0.004574247 0.022897138 -0.1997737 8.417396e-01
## degreeD     -0.016621520 0.003429577 -4.8465214 1.684099e-06
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.145572879 0.012685676 11.4753738 3.340736e-27
## homophilyD  -0.003714425 0.021471936 -0.1729898 8.627299e-01
## degreeD     -0.014183904 0.003090542 -4.5894547 5.635087e-06
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.159998543 0.013989251 11.4372485 4.793103e-27
## homophilyD   0.009395229 0.017956314  0.5232271 6.010499e-01
## degreeD     -0.021018672 0.003109676 -6.7591192 3.909050e-11
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.11477040 0.016017175  7.165458 2.816324e-12
## homophilyD  -0.03358769 0.019219113 -1.747619 8.114752e-02
## degreeD     -0.01026031 0.003379703 -3.035860 2.524347e-03
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.11230553 0.014253951  7.878905 2.113196e-14
## homophilyD  -0.01671858 0.015801557 -1.058034 2.905561e-01
## degreeD     -0.01054776 0.002273876 -4.638670 4.494356e-06
## Loading data last updated on  2023-01-20 21:50:22 
## Call model1.visible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 21:54:00 
## Call model2.visible(redo=TRUE) to update data.
## Loading data last updated on  2023-01-20 22:02:59 
## Call model3(redo=TRUE) to update data.

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_rX): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning in closeness(g_r0): At centrality.c:2874 :closeness centrality is not well-defined for
## disconnected graphs

## Warning: Removed 1 rows containing non-finite values (`stat_summary()`).

## Warning: Removed 1 rows containing non-finite values (`stat_compare_means()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                 Estimate  Std. Error     t value     Pr(>|t|)
## (Intercept)  0.135174254 0.013088390 10.32779859 8.849968e-23
## homophilyC  -0.001802408 0.026529037 -0.06794094 9.458600e-01
## degreeD     -0.020121009 0.002074977 -9.69697743 1.781259e-20
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate Std. Error   t value     Pr(>|t|)
## (Intercept)  0.14317845 0.01343781 10.654891 5.153116e-24
## homophilyC  -0.10398119 0.04101259 -2.535348 1.153899e-02
## degreeD     -0.01173863 0.00309638 -3.791083 1.684201e-04
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##               Estimate Std. Error   t value     Pr(>|t|)
## (Intercept)  0.1492954 0.01223791 12.199420 3.983669e-30
## homophilyC  -0.1175023 0.03354262 -3.503074 5.014368e-04
## degreeD     -0.0167788 0.00285648 -5.873944 7.797787e-09
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                Estimate Std. Error   t value     Pr(>|t|)
## (Intercept)  0.11480929 0.01236411  9.285691 4.991432e-19
## homophilyC  -0.03700254 0.02737720 -1.351582 1.771239e-01
## degreeD     -0.01558868 0.00266254 -5.854814 8.685429e-09
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                 Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.092041435 0.010340635  8.900946 1.037976e-17
## homophilyC  -0.053315077 0.022272158 -2.393799 1.704466e-02
## degreeD     -0.009362499 0.001780996 -5.256890 2.179468e-07

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 1 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 2 rows containing non-finite values (`stat_smooth()`).

## Warning: Removed 2 rows containing non-finite values (`stat_cor()`).

## Warning: Removed 2 rows containing missing values (`geom_point()`).

## [1] "Regression on proportion of ever-isolated individuals, Control ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.136038838 0.010525802 12.9243208 3.955062e-33
## homophilyD   0.008729852 0.018262614  0.4780177 6.328487e-01
## degreeD     -0.020949587 0.002735409 -7.6586661 9.950491e-14
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.25 ; "
##                Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.12774044 0.011978792 10.6638838 4.763150e-24
## homophilyD  -0.01800686 0.020275454 -0.8881114 3.749104e-01
## degreeD     -0.01430467 0.002918328 -4.9016666 1.288609e-06
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.5 ; "
##                  Estimate  Std. Error     t value     Pr(>|t|)
## (Intercept)  0.1337136820 0.011857108 11.27709056 2.052605e-26
## homophilyD   0.0003837234 0.015219539  0.02521255 9.798956e-01
## degreeD     -0.0212018756 0.002635721 -8.04405073 6.447748e-15
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 0.75 ; "
##                 Estimate  Std. Error    t value     Pr(>|t|)
## (Intercept)  0.110789378 0.012018944  9.2178959 8.575295e-19
## homophilyD  -0.003023449 0.014421610 -0.2096472 8.340290e-01
## degreeD     -0.016900650 0.002536057 -6.6641448 7.086526e-11
## [1] "Regression on proportion of ever-isolated individuals, degree %ile = 1 ; "
##                 Estimate  Std. Error   t value     Pr(>|t|)
## (Intercept)  0.088192173 0.010374745  8.500660 2.236329e-16
## homophilyD  -0.007989219 0.011501170 -0.694644 4.876043e-01
## degreeD     -0.010929017 0.001655042 -6.603469 1.037716e-10

plot.trends <- 
  data.frame(
    trends.df %>% 
      group_by(round, V, GINI, fractionCoop) %>% 
      summarize_all(list(mean=~mean(., na.rm=TRUE),sd=~sd(., na.rm=TRUE)))
  )

plot.trends$V = factor(plot.trends$V)
plot.trends$GINI = factor(plot.trends$GINI)

for(i in unique(plot.trends$fractionCoop)){
  g.gini = ggplot(data=plot.trends[plot.trends$fractionCoop==i,], aes(x=round,y=gini_mean,group=interaction(GINI,V))) +
  geom_line(aes(color=GINI,linetype=V)) +
  geom_ribbon(aes(ymin = gini_mean - gini_sd, ymax = gini_mean + gini_sd, fill=GINI),alpha=0.3) +
  xlab("Round")+
  ylab("gini") +
  theme_bw() 

  g.gmd = ggplot(data=plot.trends[plot.trends$fractionCoop==i,], aes(x=round,y=gmd_mean,group=interaction(GINI,V))) +
    geom_line(aes(color=GINI,linetype=V)) +
    geom_ribbon(aes(ymin = gmd_mean - gmd_sd, ymax = gmd_mean + gmd_sd, fill=GINI),alpha=0.3) +
    xlab("Round")+
    ylab("gmd") +
    theme_bw() 
  
  g.avg_wealth = ggplot(data=plot.trends[plot.trends$fractionCoop==i,], aes(x=round,y=avg_wealth_mean,group=interaction(GINI,V))) +
    geom_line(aes(color=GINI,linetype=V)) +
    geom_ribbon(aes(ymin = avg_wealth_mean - avg_wealth_sd, ymax = avg_wealth_mean + avg_wealth_sd, fill=GINI),alpha=0.3) +
    xlab("Round")+
    ylab("avg_wealth") +
    theme_bw() 
  
  g.avg_coop = ggplot(data=plot.trends[plot.trends$fractionCoop==i,], aes(x=round,y=avg_coop_mean,group=interaction(GINI,V))) +
    geom_line(aes(color=GINI,linetype=V)) +
    geom_ribbon(aes(ymin = avg_coop_mean - avg_coop_sd, ymax = avg_coop_mean + avg_coop_sd, fill=GINI),alpha=0.3) +
    xlab("Round")+
    ylab("avg_coop") +
    theme_bw() 
  
  g.avg_degree = ggplot(data=plot.trends[plot.trends$fractionCoop==i,], aes(x=round,y=avg_degree_mean,group=interaction(GINI,V))) +
    geom_line(aes(color=GINI,linetype=V)) +
    geom_ribbon(aes(ymin = avg_degree_mean - avg_degree_sd, ymax = avg_degree_mean + avg_degree_sd, fill=GINI),alpha=0.3) +
    xlab("Round")+
    ylab("avg_degree") +
    theme_bw() 
   
  
  
  plot <- ggarrange(g.gini,g.gmd,g.avg_wealth,g.avg_coop,g.avg_degree,common.legend = TRUE,legend="bottom")
  print(annotate_figure(plot, top = text_grob(paste("Closeness centrality percentile of nodes assigned to defectors =",i), color = "black", face = "bold", size = 10)))
}

## Warning: Removed 6 rows containing missing values (`geom_line()`).

## Warning: Removed 6 rows containing missing values (`geom_line()`).

## Warning: Removed 6 rows containing missing values (`geom_line()`).

## Warning: Removed 6 rows containing missing values (`geom_line()`).

## Warning: Removed 6 rows containing missing values (`geom_line()`).

fig1 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeD, y = homophilyC, color = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of defectors") + 
  scale_y_continuous("C-assortativity") +  
  scale_color_viridis(option = "magma") +
  labs(color="Isolated \nindividuals (%)")

fig2 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeD, y = homophilyD, color = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of defectors") + 
  scale_y_continuous("D-assortativity") +  
  scale_color_viridis(option = "magma") +
  labs(color="Isolated \nindividuals (%)")

fig3 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeD, y = heterophily, color = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of defectors") + 
  scale_y_continuous("Heterophily") +  
  scale_color_viridis(option = "magma") +
  labs(color="Isolated \nindividuals (%)")

fig4 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeC, y = homophilyC, color = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of cooperators") + 
  scale_y_continuous("C-assortativity") +  
  scale_color_viridis(option = "magma") +
  labs(color="Isolated \nindividuals (%)")

fig5 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeC, y = homophilyD, color = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of cooperators") + 
  scale_y_continuous("D-assortativity") +  
  scale_color_viridis(option = "magma") +
  labs(color="Isolated \nindividuals (%)")


fig6 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeC, y = heterophily, color = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of cooperators") + 
  scale_y_continuous("Heterophily") +  
  scale_color_viridis(option = "magma") +
  labs(color="Isolated \nindividuals (%)")

fig7 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeC, y = degreeD, color = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of cooperators") + 
  scale_y_continuous("Mean degree of defectors") +  
  scale_color_viridis(option = "magma") +
  labs(color="Isolated \nindividuals (%)")

print(ggarrange(fig1,fig2,fig3,fig4,fig5,fig6,fig7,common.legend = TRUE,legend="right"))

## Warning: Removed 1 rows containing missing values (`geom_point()`).
## Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 5 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 5 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).
## Removed 1 rows containing missing values (`geom_point()`).

fig1 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeC, y = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of cooperators") + 
  scale_y_continuous("Isolated individuals (%)") 


fig2 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeD, y = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of defectors") + 
  scale_y_continuous("Isolated individuals (%)") 


fig3 = ggplot(data = df.netIntLowDegree, 
                         aes(x = homophilyC, y = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("C-assortativity") + 
  scale_y_continuous("Isolated individuals (%)") 



fig4 = ggplot(data = df.netIntLowDegree, 
                         aes(x = homophilyD, y = percentIsolation*100)) + 
  geom_point() +
  scale_x_continuous("D-assortativity") + 
  scale_y_continuous("Isolated individuals (%)") 



print(ggarrange(fig1,fig2,fig3,fig4,common.legend = TRUE,legend="right"))

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 5 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 5 rows containing missing values (`geom_point()`).

reg.isolation = glm(percentIsolation*100 ~ degreeC + degreeD + homophilyC + homophilyD + heterophily, data=df.netIntLowDegree, family = gaussian(link = "identity"))
summary(reg.isolation)

## 
## Call:
## glm(formula = percentIsolation * 100 ~ degreeC + degreeD + homophilyC + 
##     homophilyD + heterophily, family = gaussian(link = "identity"), 
##     data = df.netIntLowDegree)
## 
## Deviance Residuals: 
##    Min      1Q  Median      3Q     Max  
## -9.167  -3.359  -0.739   2.215  19.761  
## 
## Coefficients:
##             Estimate Std. Error t value Pr(>|t|)    
## (Intercept)  13.6994     0.6820  20.088  < 2e-16 ***
## degreeC       0.6884     0.2205   3.122 0.001816 ** 
## degreeD      -1.3179     0.1356  -9.722  < 2e-16 ***
## homophilyC  -10.3382     2.0862  -4.955  7.7e-07 ***
## homophilyD   -1.8959     0.8147  -2.327 0.020045 *  
## heterophily -10.4520     2.9300  -3.567 0.000368 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## (Dispersion parameter for gaussian family taken to be 20.28957)
## 
##     Null deviance: 61829  on 2494  degrees of freedom
## Residual deviance: 50501  on 2489  degrees of freedom
##   (5 observations deleted due to missingness)
## AIC: 14599
## 
## Number of Fisher Scoring iterations: 2

#variance inflation factor
car::vif(reg.isolation)

##     degreeC     degreeD  homophilyC  homophilyD heterophily 
##    4.168543    3.047608    2.626181    1.431118    3.484110

reg.isolation = glm(percentIsolation*100 ~ degreeD + homophilyD, data=df.netIntLowDegree, family = gaussian(link = "identity"))
summary(reg.isolation)

## 
## Call:
## glm(formula = percentIsolation * 100 ~ degreeD + homophilyD, 
##     family = gaussian(link = "identity"), data = df.netIntLowDegree)
## 
## Deviance Residuals: 
##    Min      1Q  Median      3Q     Max  
## -8.893  -3.473  -0.687   2.172  19.115  
## 
## Coefficients:
##             Estimate Std. Error t value Pr(>|t|)    
## (Intercept) 12.51046    0.40813  30.653   <2e-16 ***
## degreeD     -1.78171    0.07939 -22.441   <2e-16 ***
## homophilyD  -0.32122    0.69636  -0.461    0.645    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## (Dispersion parameter for gaussian family taken to be 20.49007)
## 
##     Null deviance: 61829  on 2494  degrees of freedom
## Residual deviance: 51061  on 2492  degrees of freedom
##   (5 observations deleted due to missingness)
## AIC: 14620
## 
## Number of Fisher Scoring iterations: 2

#variance inflation factor
car::vif(reg.isolation)

##    degreeD homophilyD 
##   1.035236   1.035236

#double machine learning
library(DoubleML)
library(mlr3)
library(mlr3learners)
set.seed(3141)


##degreeC
dml_data = DoubleMLData$new(df.netIntLowDegree[complete.cases(df.netIntLowDegree[c("percentIsolation","degreeC","degreeD","homophilyC","homophilyD","heterophily")]),],
                             y_col = "percentIsolation",
                             d_cols = "degreeC",
                             x_cols = c("degreeD","homophilyC","homophilyD","heterophily"))
print(dml_data)

## ================= DoubleMLData Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): degreeC
## Covariates: degreeD, homophilyC, homophilyD, heterophily
## Instrument(s): 
## No. Observations: 2495

# surpress messages from mlr3 package during fitting
lgr::get_logger("mlr3")$set_threshold("warn")

learner = lrn("regr.ranger", num.trees=500, mtry=floor(sqrt(4)), max.depth=5, min.node.size=2)
ml_l = learner$clone()
ml_m = learner$clone()

obj_dml_plr = DoubleMLPLR$new(dml_data, ml_l=ml_l, ml_m=ml_m)
obj_dml_plr$fit()
print(obj_dml_plr)

## ================= DoubleMLPLR Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): degreeC
## Covariates: degreeD, homophilyC, homophilyD, heterophily
## Instrument(s): 
## No. Observations: 2495
## 
## ------------------ Score & algorithm ------------------
## Score function: partialling out
## DML algorithm: dml2
## 
## ------------------ Machine learner   ------------------
## ml_l: regr.ranger
## ml_m: regr.ranger
## 
## ------------------ Resampling        ------------------
## No. folds: 5
## No. repeated sample splits: 1
## Apply cross-fitting: TRUE
## 
## ------------------ Fit summary       ------------------
##  Estimates and significance testing of the effect of target variables
##         Estimate. Std. Error t value Pr(>|t|)  
## degreeC  0.005136   0.002050   2.505   0.0122 *
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

##degreeD
dml_data = DoubleMLData$new(df.netIntLowDegree[complete.cases(df.netIntLowDegree[c("percentIsolation","degreeC","degreeD","homophilyC","homophilyD","heterophily")]),],
                             y_col = "percentIsolation",
                             d_cols = "degreeD",
                             x_cols = c("degreeC","homophilyC","homophilyD","heterophily"))
print(dml_data)

## ================= DoubleMLData Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): degreeD
## Covariates: degreeC, homophilyC, homophilyD, heterophily
## Instrument(s): 
## No. Observations: 2495

# surpress messages from mlr3 package during fitting
lgr::get_logger("mlr3")$set_threshold("warn")

learner = lrn("regr.ranger", num.trees=500, mtry=floor(sqrt(4)), max.depth=5, min.node.size=2)
ml_l = learner$clone()
ml_m = learner$clone()

obj_dml_plr = DoubleMLPLR$new(dml_data, ml_l=ml_l, ml_m=ml_m)
obj_dml_plr$fit()
print(obj_dml_plr)

## ================= DoubleMLPLR Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): degreeD
## Covariates: degreeC, homophilyC, homophilyD, heterophily
## Instrument(s): 
## No. Observations: 2495
## 
## ------------------ Score & algorithm ------------------
## Score function: partialling out
## DML algorithm: dml2
## 
## ------------------ Machine learner   ------------------
## ml_l: regr.ranger
## ml_m: regr.ranger
## 
## ------------------ Resampling        ------------------
## No. folds: 5
## No. repeated sample splits: 1
## Apply cross-fitting: TRUE
## 
## ------------------ Fit summary       ------------------
##  Estimates and significance testing of the effect of target variables
##         Estimate. Std. Error t value Pr(>|t|)    
## degreeD -0.015249   0.001099  -13.87   <2e-16 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

##homophilyC
dml_data = DoubleMLData$new(df.netIntLowDegree[complete.cases(df.netIntLowDegree[c("percentIsolation","degreeC","degreeD","homophilyC","homophilyD","heterophily")]),],
                             y_col = "percentIsolation",
                             d_cols = "homophilyC",
                             x_cols = c("degreeC","degreeD","homophilyD","heterophily"))
print(dml_data)

## ================= DoubleMLData Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): homophilyC
## Covariates: degreeC, degreeD, homophilyD, heterophily
## Instrument(s): 
## No. Observations: 2495

# surpress messages from mlr3 package during fitting
lgr::get_logger("mlr3")$set_threshold("warn")

learner = lrn("regr.ranger", num.trees=500, mtry=floor(sqrt(4)), max.depth=5, min.node.size=2)
ml_l = learner$clone()
ml_m = learner$clone()

obj_dml_plr = DoubleMLPLR$new(dml_data, ml_l=ml_l, ml_m=ml_m)
obj_dml_plr$fit()
print(obj_dml_plr)

## ================= DoubleMLPLR Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): homophilyC
## Covariates: degreeC, degreeD, homophilyD, heterophily
## Instrument(s): 
## No. Observations: 2495
## 
## ------------------ Score & algorithm ------------------
## Score function: partialling out
## DML algorithm: dml2
## 
## ------------------ Machine learner   ------------------
## ml_l: regr.ranger
## ml_m: regr.ranger
## 
## ------------------ Resampling        ------------------
## No. folds: 5
## No. repeated sample splits: 1
## Apply cross-fitting: TRUE
## 
## ------------------ Fit summary       ------------------
##  Estimates and significance testing of the effect of target variables
##            Estimate. Std. Error t value Pr(>|t|)    
## homophilyC  -0.08766    0.01836  -4.775 1.79e-06 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

##homophilyD
dml_data = DoubleMLData$new(df.netIntLowDegree[complete.cases(df.netIntLowDegree[c("percentIsolation","degreeC","degreeD","homophilyC","homophilyD","heterophily")]),],
                             y_col = "percentIsolation",
                             d_cols = "homophilyD",
                             x_cols = c("degreeC","degreeD","homophilyC","heterophily"))
print(dml_data)

## ================= DoubleMLData Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): homophilyD
## Covariates: degreeC, degreeD, homophilyC, heterophily
## Instrument(s): 
## No. Observations: 2495

# surpress messages from mlr3 package during fitting
lgr::get_logger("mlr3")$set_threshold("warn")

learner = lrn("regr.ranger", num.trees=500, mtry=floor(sqrt(4)), max.depth=5, min.node.size=2)
ml_l = learner$clone()
ml_m = learner$clone()

obj_dml_plr = DoubleMLPLR$new(dml_data, ml_l=ml_l, ml_m=ml_m)
obj_dml_plr$fit()
print(obj_dml_plr)

## ================= DoubleMLPLR Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): homophilyD
## Covariates: degreeC, degreeD, homophilyC, heterophily
## Instrument(s): 
## No. Observations: 2495
## 
## ------------------ Score & algorithm ------------------
## Score function: partialling out
## DML algorithm: dml2
## 
## ------------------ Machine learner   ------------------
## ml_l: regr.ranger
## ml_m: regr.ranger
## 
## ------------------ Resampling        ------------------
## No. folds: 5
## No. repeated sample splits: 1
## Apply cross-fitting: TRUE
## 
## ------------------ Fit summary       ------------------
##  Estimates and significance testing of the effect of target variables
##            Estimate. Std. Error t value Pr(>|t|)
## homophilyD -0.009869   0.006733  -1.466    0.143

##heterophily
dml_data = DoubleMLData$new(df.netIntLowDegree[complete.cases(df.netIntLowDegree[c("percentIsolation","degreeC","degreeD","homophilyC","homophilyD","heterophily")]),],
                             y_col = "percentIsolation",
                             d_cols = "heterophily",
                             x_cols = c("degreeC","degreeD","homophilyC","homophilyD"))
print(dml_data)

## ================= DoubleMLData Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): heterophily
## Covariates: degreeC, degreeD, homophilyC, homophilyD
## Instrument(s): 
## No. Observations: 2495

# surpress messages from mlr3 package during fitting
lgr::get_logger("mlr3")$set_threshold("warn")

learner = lrn("regr.ranger", num.trees=500, mtry=floor(sqrt(4)), max.depth=5, min.node.size=2)
ml_l = learner$clone()
ml_m = learner$clone()

obj_dml_plr = DoubleMLPLR$new(dml_data, ml_l=ml_l, ml_m=ml_m)
obj_dml_plr$fit()
print(obj_dml_plr)

## ================= DoubleMLPLR Object ==================
## 
## 
## ------------------ Data summary      ------------------
## Outcome variable: percentIsolation
## Treatment variable(s): heterophily
## Covariates: degreeC, degreeD, homophilyC, homophilyD
## Instrument(s): 
## No. Observations: 2495
## 
## ------------------ Score & algorithm ------------------
## Score function: partialling out
## DML algorithm: dml2
## 
## ------------------ Machine learner   ------------------
## ml_l: regr.ranger
## ml_m: regr.ranger
## 
## ------------------ Resampling        ------------------
## No. folds: 5
## No. repeated sample splits: 1
## Apply cross-fitting: TRUE
## 
## ------------------ Fit summary       ------------------
##  Estimates and significance testing of the effect of target variables
##             Estimate. Std. Error t value Pr(>|t|)    
## heterophily  -0.08703    0.02397  -3.632 0.000282 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

fig1 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeD, y = homophilyC, color = avgCoopFinal*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of defectors") + 
  scale_y_continuous("C-assortativity") +  
  scale_color_viridis(option = "magma") +
  labs(color="Cooperation in \nfinal round (%)")

fig2 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeD, y = homophilyD, color = avgCoopFinal*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of defectors") + 
  scale_y_continuous("D-assortativity") +  
  scale_color_viridis(option = "magma") +
  labs(color="Cooperation in \nfinal round (%)")

fig3 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeD, y = heterophily, color = avgCoopFinal*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of defectors") + 
  scale_y_continuous("Heterophily") +  
  scale_color_viridis(option = "magma") +
  labs(color="Cooperation in \nfinal round (%)")

fig4 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeC, y = homophilyC, color = avgCoopFinal*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of cooperators") + 
  scale_y_continuous("C-assortativity") +  
  scale_color_viridis(option = "magma") +
  labs(color="Cooperation in \nfinal round (%)")

fig5 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeC, y = homophilyD, color = avgCoopFinal*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of cooperators") + 
  scale_y_continuous("D-assortativity") +  
  scale_color_viridis(option = "magma") +
  labs(color="Cooperation in \nfinal round (%)")


fig6 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeC, y = heterophily, color = avgCoopFinal*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of cooperators") + 
  scale_y_continuous("Heterophily") +  
  scale_color_viridis(option = "magma") +
  labs(color="Cooperation in \nfinal round (%)")

fig7 = ggplot(data = df.netIntLowDegree, 
                         aes(x = degreeC, y = degreeD, color = avgCoopFinal*100)) + 
  geom_point() +
  scale_x_continuous("Mean degree of cooperators") + 
  scale_y_continuous("Mean degree of defectors") +  
  scale_color_viridis(option = "magma") +
  labs(color="Cooperation in \nfinal round (%)")

print(ggarrange(fig1,fig2,fig3,fig4,fig5,fig6,fig7,common.legend = TRUE,legend="right"))

## Warning: Removed 1 rows containing missing values (`geom_point()`).
## Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 5 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).

## Warning: Removed 5 rows containing missing values (`geom_point()`).

## Warning: Removed 1 rows containing missing values (`geom_point()`).
## Removed 1 rows containing missing values (`geom_point()`).

Several explanations

More beneficial to break links

Mathematically, the expected benefit of breaking/not making new links only depends on the total number of cooperators and defectors, not the number of C and D around an ego

Altruism: making/retaining links even when there is no benefit

Degree changes in initial defectors are no different across conditions

Evolution of cooperation

This seems to occur regardless of initial defector/cooperator position (the same number of C's become D's, and the same number of D's become C's)

D has more links to start

This seems to be the most plausible explanation. Regardless of the network position, initial D's ends up becoming C's in most cases, but not without a cost: many D's tend to lose links first before reaching equilibrium, so networks that have the greatest D degrees may have the least isolation.